программа №4program str999; uses crt; var s: string; begin writeln('введіте фразу'); read(s); if (s='край озер') then writeln ('край озер лесов и рек'); if (s='я учусь в школе') then writeln ('я учусь в 10-м классе') end. №5program p_1; uses crt; var s: string; begin writeln('введите фразу'); read(s); if (s='моя родина беларусь') then writeln ('беларусь моя родина'); if (s='люблю цябе мой родны кут') then writeln ('мой родны кут люблю цябе') end.
Ответ дал: Гость
var
a: array[1..5]of integer;
i: integer;
begin
for i: =1 to 5 do read(a[i]);
for i: =1 to 5 do write(a[i],' ');
writeln;
for i: =1 to 5 do if a[i]> =1024 then writeln(a[i] div 1024);
writeln;
end.
Ответ дал: Гость
program gf; var x: integer; beginwrite('положительные двухзначные числа: '); for x: =-99 to 99 doif (x< -9) and (x> -100) thenwrite(x, ' '); writeln; write( ' отрицательные двухзначные числа: '); for x: =-99 to 99 doif (x> 9) and (x< 100) thenwrite(x, ' '); end.
Ответ дал: Гость
нам дано, что на борту есть кок и капитан, т.е:
1) 15 голов - 1 кок - 1 капитан = 15-2= 13 - это количество матросов и котов вместе
дальше нам сказано, что всего лап и ног - 41:
2) от общего количества 41 - 1 нога капитана (т.к. было сказано, что капитан одноногий) - 2 ноги кока = 41 - 3 = 38 ног матросов и лап котов.
а дальше я сделала методом подбора, и у меня получилось 6 котов, 7 матросов, ну и кок с капитаном.
Популярные вопросы