Информатика 1. Вычислить сумму однозначных чисел.2.Составить метод, вычисляющий сумму

Информатика
1. Вычислить сумму однозначных чисел.
2.Составить метод, вычисляющий сумму двухзначных чисел от 20 до 45 включительно.

Задать свой вопрос
Диман Амершаев
программка на Паскале?
Элина Вильдо
Da
1 ответ
Var A,S:integer;
Begin
S:=0;
For A:= 1 to 9 do
    S:=S+A;
Write('S = ',S);
End.



Var A,S:integer;
Begin
S:=0;
For A:= 20 to 45 do
    S:=S+A;
Write('S = ',S);
End.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт