Информатика, вопрос задал Сеня111111111111111 , 8 лет назад

написать программу которая находит сумму десяти чисел , введённых пользователем с клавиатуры.

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

Ответил дмитрий2221
0
Алгоритм на Pascal


program abc;var sum,i,k:longint; begin for i:=1 to 10 do begin read(k); sum:=sum+k; end; writeln(sum); end.

Ответил Сеня111111111111111
0
Программу требуют в виде блок-схем
Ответил дмитрий2221
0
Сайт делает так, что строки которые я копировал, соединяются в 1
Ответил Аноним
0
Не сайт, а лишь некоторые браузеры. Нужно исправить
Ответил дмитрий2221
0
я могу сказать только одно, ответ нельзя редактировать))
Ответил Аноним
0
Обновите страницу - можно будет.
Ответил ScienceTech
0
program summation;
var num, sum, counter, userValue : integer;

begin

writeln('Сколько раз просуммировать числа?');
 
readln(userValue);

for counter := 1 to userValue do

begin
    sum := 0;
    repeat
    writeln('Введите число: ');
    readln(num);

if num >= 0 then
         sum := num + sum; 
          until num < 0;
 writeln('Сумма чисел равна: ', sum);
    readln;  
end;

end.
Новые вопросы