Чтобы заварить 1,5 л чая, нужно 30 г сухого чая. Чайник вмещает В л. Сколько нужно сухого чая для заварки?
Решение:
Program zadacha;
Var B, S: real;
Begin
Writeln ('b=');
Readln (B);
s:= 30*b/1.5;
Writeln ('чая для заварки нужно', s, 'грамм');
end.
Правильно ли я оформил и решил задачу?
Допустим B= 3, тогда получится 60 гр.
1 Program TeaTask;
2 Var B, S: Real;
3 Begin
4 Write('Пожалуйста, введите B ');
5 Readln (B);
6 s:= 30*B/1.5;
7 Writeln ('Чая для заварки нужно ', s, ' грамм');
8 end.
Это если СИЛЬНО придираются к оформлению. А так - алгоритм правильный.
Правильно
Правильно!
Program zadacha;
Var B, S: real;
Begin
Write ('b=');
Readln (B);
s:= 30*b/1.5;
Writeln ('чая для заварки нужно ', s, 'грамм');
end.
Не так косо будет
Program zadacha;
Var B, S: real;
Begin
Writeln ('b=');
Readln (B);
s:= 30-b/1.5;
Writeln ('чая для заварки нужно', s, 'грамм');
end.
так правильно минус поставишь, а не умножаешь!!!
Абсолютно верно!
спс вам!
А константы записать?! Караул!
⇢