прогоняем числа от 10 до 99 в цикле, учитываем при выводе отрицательные числа.
на tpascal:
var i: integer;
begin
for i: =10 to 99 do begin
if i mod 3 = 2 then
writeln (i,' ',-i,' ');
i: =i+1;
end;
readln
end.
Ответ дал: Гость
-всех планов
-планов , на которых ровно 4 хода
- планов на которых есть ход к коту
-планов на которых не 4 хода
-планов на которых нет ходов к коту
-планов на которых 4 хода и есть ход к коту
- планов на которых 4 хода и нет ходов к коту
на пересечении круга и квадрата - мауси и котауси
в квадрате - джек
в круге - ник
в прямоугольнике - пухлик
ответ на вопрос: план джека
Ответ дал: Гость
т.к 3 вида флагов, значит возводим число 3 в степень равную кол-ву флагов
ответ: 81 сигнал
Ответ дал: Гость
var a: integer; c1, c2, c3, c4: integer;
begin for a : = 1000 to 9999 do begin c1 : = a div 1000; c2 : = (a div 100) mod 10; c3 : = (a div 10) mod 10; c4 : = a mod 10; if (c1 < > c2) and (c1 < > c3) and (c1 < > c4) and (c2 < > c3) and (c2 < > c4) and (c3 < > c4) then writeln(a); end; end.
Популярные вопросы