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.
Ответ дал: Гость
сохранить информацию о наблюдаемом объекте
передать информацию о нём другим людям
испытать на модели работу объекта ,если испытание объекта-оригинала опасно или дорого
Ответ дал: Гость
мне сказали,что 4 секунды
или
4e10 (4 в степени 10) х 2 х 8 ( 1 байт = 8 бит)= 640000000000 бит общий объём текстогого файла в битах. 640000000000 / 512e3( 512 в степени 3= 512 килобит)=1250000 секунд=347,22 часа =14,5 суток
Популярные вопросы