составьте программу вычисления суммы всех положительных двухзначных чисел, кратных 8
5-9 класс
|
var s,i:integer;
begin
s:=0;
for i:=10 to 99 do
begin
if (i mod 8 = 0) then
s:=s+i;
end;
writeln (s);
end.
Другие вопросы из категории
нкокило Г) пдлейис
а) 128 бит
б)128 байт
в)7 бит
г)1000бит
Читайте также
2.Составьте программу вычисления количества трёхзначных чисел палиндромов ( чисел, которые читаются одинаково слева направо и справа налево).
3.Найти двухзначные числа, которые делятся на сумму своих цифр
4.Составьте программу вывода количества трёхзначных чисел, у которых цифры упорядочены строго по убыванию.
РЕБЯТА СРОЧНО!!!!!!!!!!!
2) составить программу нахождения чисел от 10 до 99 сумма квадратов которых кратна 13 (mod=0)
3) найти сумму всех целых нечетных чисел меньших 100
4) найти сумму чисел в диапазоне от A до B кратных четырём. Числа А и В вводятся с клавы.
5) Найти все натуральный делители натурального числа n
элементов. 3) Составьте программу вычисления среднего арифметического элементов массива. Пожалуйста.. очень надо!
натуральные числа, количество введенных чисел не известно, последовательность чисел заканчивается 0.
Количество чисел не превышает 100. Введенные числа не превышают 30000.
Программа должна вывести одно число: сумму двухзначных чисел, кратных 5.
Люди! Плиииз, помогите! Т,Т