Презентация, доклад по информатике на тему Вещественный тип

иначе, зонтик не брать.
Если в комнате темно, тогда надо включить свет.

чисел будет увеличено вдвое, а большее оставлено без изменения.

}
uses Crt;
var
a, b, c : integer;
begin
write('Введите первое целое число '); readln(a);
write('Введите второе целое число '); readln(b);
if a < b then c := 2*a
else c := 2*b;
writeln('Меньшее число ', c div 2);
writeln('Оно же увеличенное вдвое ', c)
end.

числа будут равны. В этом случае на экран надо выдать сообщение: "Числа равны".

uses Crt;
var
a, b, c : integer;
begin
write('Введите первое число '); readln(a);
write('Введите второе число '); readln(b);
if a = b then writeln('Числа равны')
else
begin
if a < b then c := 2*a
else c := 2*b;
writeln('Меньшее число ', c div 2);
writeln('Удвоенное меньшее число ', c)
end
end.

скобки:
begin
........
end;

... end;,
где записывается еще одна группа операторов.
Перед оператором else точка с запятой не ставится.

программу так, как это было сделано во втором случае, т. е. с учетом равенства вводимых чисел.
2. Составьте программу определения большего из двух чисел.
3. Составить программу определения модуля числа.