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

  • 1)Выведите квадраты натуральных чисел не превосходящих 50.
    2)Если а=10,то выйти из программы,а если меньше,то посчитать сумму этих чисел.

Ответы 1

  • program deece;const n=10;var i:integer;beginfor i:=1 to n doif i*i<50 then writeln(i,'*',i,'=',i*i);end.program deece;var a,b,c:integer;beginwriteln('Введите числа:');write('a='); read(a);write('b='); read(b);write('c=');read(c);if a=10 then exit else if a<10 then a:=a+b+c;end.

    • Автор:

      janetfvkk
    • 1 год назад
    • 2

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

Еще вопросы

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

Войти через Google

 или

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

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

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