№1 Вывести на экран числа в диапазоне от 10 до 100, которые кратны четырем. №2 Н...

July 2022 1 8 Report

№1 Вывести на экран числа в диапазоне от 10 до 100, которые кратны четырем.

№2 Найти сумму чисел, которые оканчиваются на пять, меньше 10 и больше (-10).

№3 Подсчитать количество трехзначных чисел, которые начинаются на цифру «2» и вывести эти числа на экран.

Напишите пожалуйста программу на языке паскаль

Answers & Comments

saintegg Решение для данной задачи

3 votes Thanks 2

saintegg Первая задача

saintegg program psck;

var

i : integer;

begin

for i:=10 to 100 do if i mod 4 = 0 then writeln(i);

end.

saintegg Вторая задача

saintegg не понятно условие

saintegg Третья задача

saintegg program psck;

var

i, count : integer;

begin

count:=0;

for i:=100 to 999 do if i div 100 = 2 then
begin
count:=count+1;
writeln(i);
end;
write('Количество данных чисел - ',count);

end.

DEOS2 спасибо, даже за эти 2 задачи

Answers & Comments

reshite pozhalujsta na yazyke paskale0fe712f303aed2c25babc95751ae094 50646

6 sredi vseh dvuznachnyh chisel ukazat te summa cifr kotoryh bolshe 15 7 dano

4 posledovatelno vvodyatsya n chisel najti summu vseh polozhitelnyh chisel sredi

1 najti summu chisel ot 10 do n kratnyh 10 gde 10 2vyvesti posledovatelnos

1napishite programmu kotoraya v posledovatelnosti celyh chisel opredelyaet kolicheaceecc5775fcc3ae466ceabb2052f7f1 98131

1napishite programmu kotoraya v posledovatelnosti celyh chisel opredelyaet koliche

3napishite programmu kotoraya v posledovatelnosti celyh chisel opredelyaet summu

рекомендуемые вопросы

Helpful Links

Helpful Social