Предмет: Информатика,
автор: AneCCka
Ввести 2 числа. Вычесть из большего меньшее. (на языке паскаля)
Ответы
Автор ответа:
0
program prim;
uses crt;
var
a,b,r: integer;
begin
clrscr;
writeln ('ввести два числа');
readln (a,b);
if a>b then
begin
r:=a-b;
end
else
begin
r:=b-a;
end;
writeln ('r=', r:5);
readkey;
end.
Интересные вопросы
Предмет: Физика,
автор: nisabaev3
Предмет: Английский язык,
автор: RufinaNyatina
Предмет: Английский язык,
автор: milanakotik764
Предмет: Математика,
автор: 2512танюша