Люди добрые, помогите пожалуйста!Дано натуральное трёхзначное число. Напишите программу, которая определяет: (фото)

1 ответ

Посмотреть ответы

Megamozg

2205

var
s:string[3];
flag1,flag2:boolean;
begin
flag1:=false;
flag2:=false;
s:='';
readln(s);
if (s[1]=s[3]) then
begin
flag2:=true;
flag1:=true;
end
else
if (s[1]=s[2]) or (s[3]=s[2]) then
flag1:=true;
if flag1 then
writeln('Да')
else writeln('Нет');
if flag2 then
writeln('Перевёртыш')
else writeln('Нет');
end.

Хороший ответ

5 апреля 2023 08:12

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Что такое линейный алгоритм. Приведите примеры линейного алгоритма.... Задание про робота... Как пояснить название метода сортировки массива метод пузырька... Чему равен результат сложения чисел 110 в двоичной и 12 в восьмиричной? Можно по подробнее)... fоr i in rаngе( c, 42, d):        рrint ( i, end=" " ) В результате работы этого фрагмента программы на эк...