Вычислить сумму 10 натуральных чисел, вводимых с клавиатуры. program demofor1; var s, p, i: integer; begin for i: =.. to .. dobeginwriteln (‘введите число’); (p); s: =s+ ; end; writeln (‘ сумма равна’; end.
214
396
Ответы на вопрос:
Program demofor1; var s, p, i: integer; begin for i: = 0 to 9 do begin writeln ('введите число'); readln(p); s: =s+p ; end; writeln (' сумма =', s); end.
Популярно: Информатика
-
Yurk1517.12.2020 03:53
-
Fela0607.10.2021 19:11
-
Anvar66607.09.2020 09:39
-
АлираПендрагон25.03.2021 04:37
-
QuellTT30.11.2021 09:04
-
Вячеслав99115.01.2022 07:55
-
accacherrygdghvcg29.09.2020 09:17
-
glebyha2212.08.2021 08:53
-
Александрик39712.01.2020 17:28
-
123456789125201.07.2020 19:27