Помагите решит информатика Изучив числовую тему, он решил запрыгнуть на пронумерованную ячейку со своими - id1510095220220512 от никита3497 12.05.2022 04:02

Question

Информатика: Помагите решит информатика Изучив числовую тему, он решил запрыгнуть на пронумерованную ячейку со своими идеями: 1 247 11 16 22 29 и так далее. Другую саранчу поместили в одну клетку N, чтобы она не прыгала в бесконечность второй саранче создать алгоритм отслеживания попадания первой саранчи в сетку N.

никита3497 · Accepted Answer

// PascalABC.NET 3.0, сборка 1073 var   c:char; begin   Write( Введите римскую цифру (I,V,X,L,C,D,M): ); Readln(c);   case c of   I :Writeln( 1 );   V :Writeln( 5 );   X :Writeln( 10 );   L :Writeln( 50 );   C :Writeln( 100 );   D :Writeln( 500 );   M :Writeln( 1000 );   else Writeln( Вы ошиблись )   end end. // PascalABC.NET 3.0, сборка 1073 var   n:byte;   x,y:real; begin   Write( Введите номер варианта (1-5): ); Readln(n);   case n of   1:begin     Write( Выражение x^2+y^2, введите x,y: ); Read(x,y);...

MOGZ ответил