3. Разобраться в решении задачи. Записать условие - вопрос №106678033 от iragav30 13.09.2021 12:34

Question

Информатика: 3. Разобраться в решении задачи. Записать условие задачи. Заполнить раздел описания переменных с указанием типа и назначения каждой переменной. Var Begin Sum:=0; x:=0; While Sum 10 do begin Sum:=Sum+x; X:=x+1; End; Writeln(‘Sum=’,Sum); End

iragav30 · Answer

Найти сумму первых 4-х натуральных чисел.

Var

X,sum:byte;

Или

Var

X,sum:word;

Или (это, скорее всего ожидаемый ответ)

Var

X,sum:integer;

X - переменная для очередного натурального числа

Sum - переменная для пошагового суммирования

Объяснение: