Написать программу: выбрать наибольшее из двух вещественных чисел. Язык -Паскаль
Program mb;var a,b:integer;beginclrscr;writeln('vvedite a,b');readln(a,b);if a>b then writeln('большим является a')else writeln('большим является b');end.
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.
clrscr;
uses crt;
что это?
Это модуль для работы с экраном.
ты можешь убрать uses crt и clrscr - это на работу не повлияет