Помогите пожалуйста... Уже не понимаю к концу дня ничего. Мне надо составить программу....

Question

Помогите пожалуйста... Уже не понимаю к концу дня ничего.
Мне надо составить программу. Написать что и как..

Задача: Определить по введённой тем-ре, является ли она водой,льдом или паром.

Comments

5 мин

Answer 1

Program BP;
Uses crt;
var a:integer;
begin
clrscr;
Writeln('Введите температуру воды ');
readln(A):
if a<=0 then writeln('Лед');<br>if a>0 then begin writeln('жидкая ');  exit; end;
if a>100 then begin writeln('Пар'); exit; end;
end.