Написать программу: выбрать наибольшее из двух вещественных чисел. Язык -Паскаль

0 голосов
53 просмотров

Написать программу: выбрать наибольшее из двух вещественных чисел. Язык -Паскаль


Информатика (12 баллов) | 53 просмотров
Дан 1 ответ
0 голосов

Program mb;var a,b:integer;beginclrscr;writeln('vvedite a,b');readln(a,b);if a>b then writeln('большим является a')else writeln('большим является b');end.

(123 баллов)
0

Program mb;
uses crt;
var a,b:integer;
begin
clrscr;
writeln('vvedite a,b');
readln(a,b);
if a>b then
writeln('большим является a')
else
writeln('большим является b');
end.

0

clrscr;

0

uses crt;

0

что это?

0

Это модуль для работы с экраном.

0

ты можешь убрать uses crt и clrscr - это на работу не повлияет