0)начало 1)посадил дед репку 2)выростил 3)начал ее вытягивать из земли 4)позвал бабку 5)тянут потянут ,вытянуть не могут 5)позвали внучку 6)тянут потянут ,вытянуть не могут 7)позвали жучку 8)тянут потянут ,вытянуть не могут 9) позвали кошку 10) тянут потянут, вытянуть не могут 11)позвали мышку вытащили 12)конец
Спасибо
Ответ дал: Гость
v - объём цилиндрачисло пи = 3,14язык программирования: паскальvarv, r, h : real; beginreadln (r); readln (h); v : = 3.14 * sqr(r) * h; writeln (v)end.
Ответ дал: Гость
ха-ха-ха)) учебник по информатике за 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.
Популярные вопросы