Записи адреса web-страница хронящейся на сервере интернета зарегистрированна в домене верхнего уровня ru домене второго уровня schools и имеющем собственным именем www
264
296
Ответы на вопрос:
Var x,n,k: integer; begin k: =0; writeln('введите количество чисел в последовательности'); readln(n); writeln('введите числа'); while n> 0 do begin readln(x); if x mod 3=0 then k: =k+1; n: =n-1; end; writeln('количество чисел четных 3 = ',k); end.
Популярно: Информатика
-
ната11884522.05.2020 00:20
-
Laurka1120.10.2021 10:23
-
алиса234326.03.2023 12:07
-
alina374121.05.2023 19:42
-
fuzzy7701.02.2020 23:22
-
milana616413.10.2021 18:17
-
polix200804.12.2020 03:39
-
нурсула122.06.2023 07:30
-
faton6319.11.2020 04:02
-
angelinochka34514.05.2023 14:37