Дамп всех задач
This commit is contained in:
9
Pascal/vetvl/Program6.pas
Normal file
9
Pascal/vetvl/Program6.pas
Normal file
@@ -0,0 +1,9 @@
|
||||
var a: real;
|
||||
begin
|
||||
writeln('t');
|
||||
Readln(a);
|
||||
if 36 > a then writeln('ill ', a)
|
||||
else if a >= 37 then writeln('ill ', a)
|
||||
else
|
||||
writeln('good ', a)
|
||||
end.
|
||||
Reference in New Issue
Block a user