Написать программу: Вывести сообщение "оценка 5" если (x+1)div(x-1) > a, иначе " Задача верна". А и Х вводятся с клавиатуры - целочисленные.
verasinitsynaspb:
паскаль?
Ответы
Ответ дал:
0
Ответ:
program qq;
var a, x: integer;
begin
writeln('Введите числа a и x');
readln(a, x);
if (x+1)div(x-1) > a then
begin
writeln('Оценка 5');
end
else
begin
writeln('Задача верна');
end;
end.
Объяснение:
Вас заинтересует
1 год назад
7 лет назад
7 лет назад
8 лет назад