1)нлрзпгхсёугч
2)усдсх
3)црлеиуфлхзх
4)криптогрфаия- выходит по вашим буквам, там наверно у вас надо поменять Ч и Г. будет криптография
Var a,b:integer;
begin
read(a,b);
if a > b then writeln(a/b, a)
else writeln(b/a, b);
end.
Var a,S,P:integer;
Begin
Readln(a);
S:=a*a;
P:=a*4;
writeln('Периметр = ',P,' Площадь = ',S);
readln;
end.
98/25 = 3, остаток 23 → 3 монеты по 25 коп
23/10 = 2, остаток 3 → 2 монеты по 10 копеек
3/2 = 1, остаток 1 → 1 монета в 2 коп
1 → 1 монета в 1 коп.
Итого 6 монет.