1) Напишите программку которая в последствии естественных чисел определяет, находит сумму
1) Напишите программку которая в последствии натуральных чисел определяет, обретает сумму двузначных чисел не кратных 4. В последовательности непременно имеется двузначное число не кратное 4.
Вход: программа получает на выход кол-во чисел, а затем сами числа. Кол-во чисел не превосходит 1000, а сами числа не превосходят 30000.
Выход: Программка обязана вывести одно число-кол-во нечётных чисел кратных 4.
2) Напишите программу которая в последствии естественных чисел определяет, обретает сумму двузначных чисел не кратных 7. В последовательности обязательно имеется двузначное число не кратное 7.
Вход: программа получает на выход кол-во чисел, а потом сами числа. Кол-во чисел не превышает 1000, а сами числа не превосходят 30000.
Выход: Программа обязана вывести одно число-кол-во нечётных чисел кратных 7 .
program ryazantsev;
var i,n,t,s:integer;
begin
s:=0;
readln(n);
for i:=1 to n do begin
readln(t);
if (t mod 4 lt;gt; 0) and (t in [10..99]) then s:=s+t
end;
writeln(s)
end.
2) Для семёрки:
program ryazantsev;
var i,n,t,s:integer;
begin
s:=0;
readln(n);
for i:=1 to n do begin
readln(t);
if (t mod 7 lt;gt; 0) and (t in [10..99]) then s:=s+t
end;
writeln(s)
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Физика.
Математика.
Разные вопросы.
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.