profile
Опубликовано 6 лет назад по предмету Информатика от SolonichenkoMatvey

Дано двузначное число Напишите программу на языке Паскаль, которая определяет: Есть ли среди цифр заданного целого двузначного числа одинаковые.

  1. Ответ
    Ответ дан FunSociety

    var s:string;

    begin

     write('Введите целое двузначное число: ');

     readln(s);

     if s[1]=s[2] then writeln('Цифры одинаковы')

     else writeln('Цифры различаются');

     readln

    end.  

Самые новые вопросы