Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var s: string; i: longint; begin readln(s); for i: =length(s) downto 1 do begin if s[i]=' ' then delete(s,i,1); if (s[i]> ='1')and(s[i]< ='9') then delete(s,i,1); end; writeln(length(s)); end.
program xxx;
var n, c, d, e, s : integer;
begin
write('введите число');
readln(n);
c: = n div 100;
d: =(n div 10) mod 10;
e: = n mod 10;
s: = c + d + e;
writeln('сумма чисел =', s);
readln
end.
смотри описание блок схемы на картинке
-всех планов
-планов , на которых ровно 4 хода
- планов на которых есть ход к коту
-планов на которых не 4 хода
-планов на которых нет ходов к коту
-планов на которых 4 хода и есть ход к коту
- планов на которых 4 хода и нет ходов к коту
на пересечении круга и квадрата - мауси и котауси
в квадрате - джек
в круге - ник
в прямоугольнике - пухлик
ответ на вопрос: план джека
Популярные вопросы