Самолёт находится на высоте 5000 метров. обнаружилась неисправность работы двигателя. самолёт начал падать. бортовой компьютер производит диагностику неисправности и сообщает пилоту о необходимых действиях. для решения этой ему нужно выполнить 10^8 вычислительных операций. быстродействие компьютера – 1 млн. операций в секунду. успеет ли лётчик спасти самолёт, если минимальная высота, на которой самолёт можно вывести из пике – 2000 метров?

ха-ха-ха)) учебник по информатике за 10

там все

программа №4

program str999; uses crt; var s: string; begin writeln('введіте фразу'); read(s); if (s='край озер') then writeln ('край озер лесов и рек'); if (s='я учусь в школе') then writeln ('я учусь в 10-м классе') end.

потхоньку буду дополнять, не так все быстро)) 

№5

program р_1; uses crt; var s: string; begin writeln('введите фразу'); read(s); if (s='моя родина беларусь') then writeln ('беларусь моя родина'); if (s='люблю цябе мой родны кут') then writeln ('мой родны кут люблю цябе') end. 

например такие числа

954-459=495