Ответ:
Смотри картинку
Объяснение:
жидкий [0, 100]
твердый (- ∞, 0)
газообразный (100, + ∞)
program z1;
var t:real;
begin
write ('t = ');
readln (t);
if t>100 then write ('газообразный')
else
if t<0 then write ('твердый')
else write ('жидкий')
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Смотри картинку
Объяснение:
жидкий [0, 100]
твердый (- ∞, 0)
газообразный (100, + ∞)
program z1;
var t:real;
begin
write ('t = ');
readln (t);
if t>100 then write ('газообразный')
else
if t<0 then write ('твердый')
else write ('жидкий')
end.