Задача из Python. Можно на листке бумаге Користувачеві відображається загадка, наприклад Що літає, крил - id1663016220200826 от disimasai 26.08.2020 04:40

Question

Информатика: Задача из Python. Можно на листке бумаге Користувачеві відображається загадка, наприклад Що літає, крил не має, але крила підіймає? Якщо користувач вводить правильну відповідь: вітер, то програма видає повідомлення Так, супер!, інакше буде виведено повідомлення На жаль, ні.

disimasai · Accepted Answer

Var
i, a, b, n, n2, j: longint;
s: string;
flag: boolean;

begin
Write('Введите натуральное число больше 11: ');
Readln(a);
if a <= 11 then Writeln('11 - первое симметричное число')
else begin
    Str(a, s);
    n := Length(s); n2 := n div 2; flag := true; i := 1;
    repeat
      flag := (s[i] = s[n - i + 1]);
      i := i + 1
    until (not flag) or (i > n2);
    if flag then Write('Число симметричное')
    else Write('Число несимметричное')
end;
end.

Тестовое решение:

Введите натуральное число больше 11: 123454321
Число симметричное

MOGZ ответил