СРОЧНО ПОМОГИТЕ!!!
ввести с клавиатуры значение жирности молока (а-целое число в диапазоне от 0 до 100).
Вывести на экран следующее сообщение:
"Это-молоко"-если а<6;
"Это-сливки"-если 6 "Это-сметана"-если а>20
ввести с клавиатуры значение жирности молока (а-целое число в диапазоне от 0 до 100).
Вывести на экран следующее сообщение:
"Это-молоко"-если а<6;
"Это-сливки"-если 6 "Это-сметана"-если а>20
Answers & Comments
uses CRT;
var a:integer;
begin
readln(a);
if a<6 then
writeln('Это-молоко');
if a=6 then
writeln('Это-сливки');
if a>20 then
writeln('Это-сметана');
end.