Добавил:
Studfiles2
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Курсовая работа2 / Examples / Condit
.pas var a: integer;
b: boolean;
c: real;
begin
Write('Enter c (real): ');
read(c);
if (c > 5.6) then
write('TRUE')
else
write('FALSE');
end.
b: boolean;
c: real;
begin
Write('Enter c (real): ');
read(c);
if (c > 5.6) then
write('TRUE')
else
write('FALSE');
end.
Соседние файлы в папке Examples