Напишите программу которые выводить ряд квадрата нечетных чисел до 30 используя оператор while
291
464
Ответы на вопрос:
100 .. 999 - диапазон трехзначных целых чисел. в этом диапазоне поищем числа кратные 6. (вариант не самый оптимальный)
var i,k: integer;
begin
k: =0;
for i: =100 to 999 do begin
if i mod 6 = 0 then
k: =k+1;
end;
writeln(k);
end.
Популярно: Информатика
-
martynenko747415.01.2021 00:46
-
olya2005i17.12.2021 21:15
-
forgalaxynexusp09txz12.11.2020 00:25
-
EvilHany22.03.2020 10:35
-
Popova2310197724.09.2020 04:58
-
somov10113.05.2023 17:43
-
Маша2004112423.10.2022 06:20
-
ycnakouc7oy2xua26.10.2022 12:59
-
popopolka12.01.2021 05:10
-
penguin827.08.2020 17:06