Есть ответ 👍

Дан ряд натуральных чисел от 40 до 90. Вывести на экран только те числа этого ряда, которые оканчиваются на 8
через паскаль

225
380
Посмотреть ответы 3

Ответы на вопрос:


===== PascalABC.NET =====

begin

 40.To(90).Where(p -> p mod 10 = 8).Print

end.


program mas_krat_8;

const n=15;

var

a:array[1..n] of integer;

i:integer;

begin

for i:=1 to n do

a[i]:=random(51)+40;

for i:=1 to n do

write(a[i],' ');

writeln;

for i:=1 to n do

if (a[i]mod 10 =8)

then

write(a[i],' ')

end.


Камень! камень может быть носителем информации: )

Популярно: Информатика