Ответы
Ответ дал:
0
Var v:integer;
Begin
Readln (v);
If v>90 then Writeln ('Штраф') else Writeln ('Молодец');
end.
Begin
Readln (v);
If v>90 then Writeln ('Штраф') else Writeln ('Молодец');
end.
Вас заинтересует
1 год назад
1 год назад
5 лет назад
8 лет назад