Учитель задал ученику следующую задачу:
Напиши программу с использованием цикла while , которая будет по вводимому с клавиатуры целому числу n, подсчитывать сумму всех целых чисел от 2 до n с шагом 3.

Ученик спешил и написал программу с ошибками. Исправь все ошибки в программе (используй программу Pascal).

var ; i,S:real:
read(n)
i:=1
S:=0;
while i<n do begin
i:=i+3;
S:=S+S; 
writeln(‘S= ’, i);​

viktorvipp0aa6w    1   27.04.2021 10:04    4