Дано естественное число, если оно больше 5, то возведите в квадрат,

Дано естественное число, если оно больше 5, то возведите в квадрат, если нет, то пусть на экране появится надпись ошибка ввода

Задать свой вопрос
Олег Воробей
На паскале
Уразбаева Олеся
Обычная программа. Введи N, примени полную форму условного перехода
Валерия
в одной доли условия если оно истинно возведи в квадрат N в другой выведи известие "Ошибка"
2 ответа
var a:integer;
begin
write('a = ');
readln(a);
if agt;5 then writeln(a,'^2 = ',a*a)
else writeln('Ошибка ввода');
end.

Пример:
a = 9
9^2 = 81
Var 
 a: integer;

begin
  write('Введите число: ');
  read(a);
  if(a gt; 5) then a := a * a
  else write('ошибка ввода');
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт