Предмет:
ИнформатикаАвтор:
анонимВычислить сумму цифр;
Задать единственное число;
Вывести сумму чисел и получить конечный результат.
http://bit.ly/2naws7D
Program Nat; (даем название программы)
Var a,b, integer; (описываем переменные)
Begin (тело программы)
I = 1, S = 0;
While I <25 do
Begin S: = S + I; I: = I + 2 end;
Write (‘S = ’, S) (выводим результат на экран)
end. (обязательно по завершению программы ставим точку).
Автор:
noeleq8hДобавить свой ответ
Предмет:
Другие предметыАвтор:
анонимОтветов:
Смотреть