Составить в паскаль программу вывода на экран чисел кратных трём из 10 введённых чисел в компьютер
193
398
Ответы на вопрос:
Program kratni_trem;
var: array[1..10] of integer; i:integer
begin
For i:=1 to 10 do
read(a[i],’ ‘);
For i:=1 to 10 do
If a[i] mod 3=0 then write(a[i], ‘ ‘);
end.
var: array[1..10] of integer; i:integer
begin
For i:=1 to 10 do
read(a[i],’ ‘);
For i:=1 to 10 do
If a[i] mod 3=0 then write(a[i], ‘ ‘);
end.
Популярно: Информатика
-
NikaName00728.01.2021 17:49
-
asyamilos02.03.2021 05:35
-
вера57104.08.2020 08:14
-
SASHABACUNOV10.05.2022 13:27
-
скули16.11.2020 08:27
-
катя508903.05.2021 04:55
-
неумно21.12.2020 14:34
-
ученик1121104.01.2021 01:58
-
Eteryna10.01.2021 14:08
-
karolinetynfag10.11.2021 01:29