ПОЖАЛУЙСТА.Составить программку нахождения среднего арифметического всех целых чисел от 10 до

ПОЖАЛУЙСТА.
Составить программку нахождения среднего арифметического всех целых чисел от 10 до 45. ПАСКАЛЬ

Задать свой вопрос
1 ответ
Var
A,S:integer;
Begin
S:=0;
For A:= 10 to 45 do
    S:=S+A;
WriteLn(S/36)
End.
Борис Воевудский
В 10 классе умел 6-значные числа перемножать секунд за 15-20, а вот ложить и вычитать - до сих пор проблема :D
Илюша Танжев
Пару минут необходимо, чтоб выяснить, сколько будет, к примеру, 28 - 17
Тюльдюков Данька
Когда числа больше 20 - мозг на паузу встаёт. А там только циферки ложить))
Колек Тюттвин
Знаю, всё равно зависаю)))
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт