Дан ряд натуральных чисел от 40 до 90. Вывести на экран только те числа этого ряда, которые оканчиваются на 8
через паскаль
225
380
Ответы на вопрос:
===== 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.
Популярно: Информатика
-
Jdjdhdh66t07.01.2021 20:47
-
даша390107.12.2020 08:10
-
Grazhdankin29.05.2021 16:02
-
Papyas314.01.2023 20:59
-
superman33315.12.2022 08:19
-
DmdmdmA11.07.2020 04:07
-
STAS22891765432108.01.2020 10:23
-
Darya019213.10.2020 05:27
-
alsu140113.01.2023 22:55
-
alikhanchik04.08.2022 23:40