Учитель задал ученику следующую задачу:
Напиши программу с использованием цикла 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);
Последовательно разделить на 13, 11 и 7 – значит разделить число на произведение 13 * 11* 7, которое равно 1001.
Получается, что мы число сначала умножаем на 1001, а после делим на 1001. Естетственно, у нас получится исходное число:
(n * 1001) / (13 * 11 * 7) = (n * 1001) / 1001 = n.