Перевести с Paskal на Java. Много ! var
k: integer;
begin
readln(k);
if k<0 then
writeln('Не может такого быть')
else
begin
write('Мы нашли в лесу ',k,' гриб');
if (k mod 100 in [5..19]) then
writeln('ов')
else if (k mod 10 in [2..4]) then
writeln('а')
else if (k mod 10=1) then
writeln
else
writeln('ов');
end;
end.

ryschowa    3   05.11.2020 12:10    0