Ответы на вопрос:
Program v; var a,b,n: integer; begin while (n < 5) do begin readln (a); if (a mod 2 = 0) then begin b: =b+a; n: =n+1; end; end; writeln (b); end.
Популярно: Информатика
-
nasamar18.08.2022 15:59
-
xeniaverner25.04.2021 00:02
-
Арукаа1125.05.2021 05:57
-
Vovan1005200206.02.2020 06:27
-
kolasalnov517.05.2022 17:37
-
Sonya4513826.07.2021 18:51
-
olyaolya2215.04.2020 18:02
-
Zhuldyzovazarina24.02.2021 08:55
-
Отличница456111.04.2022 07:52
-
ARTiStlll21.07.2020 03:24