Задать вопрос Регистрация
Помочь другим

  • в паскале задачи решить (программу написать)

    1)найти сумму элементов от А до Б

    2)вывести все элементы от А до Б при любых значениях А и Б (целых)

Ответы 1

  • Program n1;Uses CRT;Var a,b,s,i: integer;beginwriteln('Vvedite A i B');readln(a,b);If a>b then for i:=b to a do begin writeln(i); s:=s+i; end else if b>a then for i:=a to b do begin writeln(i); s:=s+i; end else writeln('ravny');writeln('Summa = ',s);readlnend.

    • Автор:

      maryciuz
    • 5 лет назад
    • 0

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years