Найти сумму всех двузначных чисел, имеющих в записи цифру 1 - QBasic

  1. Найти сумму всех двузначных чисел, имеющих в записи цифру 1.


textual

Код к задаче: «Найти сумму всех двузначных чисел, имеющих в записи цифру 1 - QBasic»

FOR i=10 TO 91
IF i\10 =1 OR i MOD 10=1 THEN s=s+i
NEXT
PRINT s

СДЕЛАЙТЕ РЕПОСТ

7   голосов, оценка 4.429 из 5



Похожие ответы
  1. Составить программу , проверяющую, является ли последовательность из 10 целых чисел, вводимых с клавиатуры, возрастающей. Задачка вроде легкая, но как вывести ответ конкретно да или нет не догоняю! Заранее спасибо

  1. Дано 7 чисел. 1*7; 2*6; 3*5; 4*4; 5*3; 6*2; 7*1 Между этими числами надо расставить три знака сложения и три знака вычитания так, чтобы полученная сумма была максимальной. (проверено)

  1. помогите пожалуйста решить задачу "определить количество трехзначных натуральных чисел, сумма цифр которых равна заданному числу N" заранее спасибо.

  1. Всем добрый вечер. Помогите решить задачу: Дана последовательность из N целых двузначных чисел типа: 17,11,43,44,98,77, 72... Найти сумму тех чисел, в запись которых входит хотя бы одна цифра 7 Заранее спасибо

  1. Напишите на языке программирования qbasic, чтобы тройка натуральных чисел являлась тройкой т.Пифагора, т.е. c^2=a^2+b^2

  1. Дана задача. Найти максимальное среди двух чисел, не используя условный оператор

  1. надо умножить два числа допустим 'а' и 'н' с помошью цикла for не используя знака умножения то есть надо число 'а' надо прибавить 'а' 'н' раз заранее спасибо

  1. Помогите решить 1)В массиве С(10) найти количество чисел, попавших в интервал [A,B] 2)дан массив из N элементов. найти среднее арифметическое положительных элементов массива 3) В массиве из 15 элементов найти количество элементов, кратных 3 или 5. 4) Числовой одномерный массив заполнен целыми случайными двузначными числами (в диапазоне от 10 до 99). Найти сумму элементов этого массива, больших 50.