Есть ответ 👍

Розгадайте ребуси
https://dbimg.eu/i/xrj4dzpv.png
https://dbimg.eu/i/pjo8gyme.jpg
https://dbimg.eu/i/obu31s2k.jpg
https://dbimg.eu/i/tgc6nwfg.jpg

253
468
Посмотреть ответы 1

Ответы на вопрос:


Var i,n: integer; k,k1: real; begin; readln(n); for i: =1 to n do //повторить n раз begin;             //начало тела цикла     readln(k1);     //читаем промежуточную переменную   k: =k+k1;       //прибавляем к общей сумме end;               //конец тела цикла writeln('result: ',k);   //вывод общей суммы end.

Популярно: Информатика