Ответы на вопрос:
мама привет как дела у вас есть возможность то лучше не надо было бы здорово если
var
_counter, i : integer;
begin
for i := 100 to 999 do
if ((i mod 6 = 0) and (i mod 10 = 4)) then
_counter := _counter + 1;
writeln(_counter);
end.
Популярно: Информатика
-
konsantin180514.12.2022 00:54
-
albinazagidulli29.12.2021 01:19
-
kosenkoanton7227.01.2022 18:44
-
valia0102200420.09.2021 16:46
-
kitikdasa3312.09.2021 21:53
-
niklysov201523.03.2020 14:17
-
Anvar66601.05.2020 12:45
-
KarinaZinovets09.11.2020 03:06
-
Ayannn30.11.2022 02:31
-
kyrenkovalena806.05.2020 03:26