Категория - Информатика Автор - rin7rghc 6 лет назад Цикл while запросить 6 чисел и вывести их сумму Главное, чтобы счётчик начинался с 1, пожалуйста как можно скорее
Категория - Информатика Автор - rin7rghc 6 лет назад Цикл while запросить 6 чисел и вывести их сумму Главное, чтобы счётчик начинался с 1, пожалуйста как можно скорее
Ответ Автор - lazarchukde var a,sum,k:integer; begin k := 1; while k < 7 do beginread(a); sum:=sum+a;k:=k+1;end;write(sum) end.