
Dagdathis
5 год назад
Пожалуйста посчитайте, пожалуйста, решить задачу в ПАСКАЛЕОдна из основных операций с числами – их сравнение. Мы подозреваем, что вы в совершенстве владеете этой операцией и можете сравнивать любые числа, в том числе и целые. В данной задаче необходимо сравнить два целых числа. Входные данныеВ двух строчках входного файла INPUT.TXT записаны числа A и B, не превосходящие по абсолютной величине 2×109. Выходные данныеЗапишите в выходной файл OUTPUT.TXT один символ “<”, если A < B, “>”, если A > B и “=”, если A=B. 1.57(<) 2.-7-12(>)3.1313(=)
ОТВЕТЫ

Евгений
Oct 24, 2020
var
a, b:integer;
f,w:text;
begin
assign(f,'input.txt');reset(f);
assign(w, 'output.txt');rewrite(w);
Readln(f, a, b);
if (a > b) then Writeln(w, '>');
if (a < b) then Writeln(w, '<');
if (a = b) then Writeln(w, '=');
close(f);close(w);
end.
input.txt: 100 99
output.txt : >
a, b:integer;
f,w:text;
begin
assign(f,'input.txt');reset(f);
assign(w, 'output.txt');rewrite(w);
Readln(f, a, b);
if (a > b) then Writeln(w, '>');
if (a < b) then Writeln(w, '<');
if (a = b) then Writeln(w, '=');
close(f);close(w);
end.
input.txt: 100 99
output.txt : >
717
Смежные вопросы: