С клавиатуры вводится произвольное количество чисел N. Определите количество (К) и сумму (S) положительных чисел, оканчивающихся на
5-9 класс
|
6.
Пишу на QBasic
CLS
INPUT N
FOR I = 1 TO N
PRINT "Введите число"
INRUT A
IF A>0 AND A MOD 10 = 6 THEN
K=K+1
S=S+A
END IF
NEXT I
PRINT K
PRINT S
Другие вопросы из категории
Вывести на экран результат умеожения 5 на числа от 10 до 20
чисел, кратных 3, с использованием параметрического цикла. Ответ
прикрепите в виде файла в среде PascalABC.
них такие, которые образованы при помощи одного и того же общего для них
свойства. Что это за свойство?а) 2, 4, 6, 8, 10, ... ;
б) 2, 4, 8, 16, 32, ... ;
в) 1, 2, 3, 4, 5, ... ;
г) 2, 5, 8, 11, 14 ...;
Читайте также
2, С клавиатуры вводятся 15 натуральных чисел. Подсчитать количество элементов, кратных 3 и 5.
3, С клавиатуры вводятся 10 натуральных чисел. Вычислить произведение чисел, больших 10, но меньших 20.
2, С клавиатуры вводятся 15 натуральных чисел. Подсчитать количество элементов, кратных 3 и 5.
3, С клавиатуры вводятся 10 натуральных чисел. Вычислить произведение чисел, больших 10, но меньших 20.
Напишите скрипт пожалуйста
натуральных двузначных чисел. Определить
среднее арифметическое нечетных чисел;
№3 С клавиатуры вводятся 10 натуральных двузначных чисел. Определить
верно ли, что среди введенных чисел есть число, в котором первая цифра в два раза больше последней.
числа, количество введеных чисел неизвестно, последовательность чисел заканчивается числом 0 (0-признак окончания ввода, не является членом последовательности). Количество чисел не превышает 1000. Введеные числа по модулю не превышают 30000. Программа должна вывести число: количество чисел, кратных 4 и оканчивающихся на 0.