Регистрация
умник162д
25.01.2021 08:47
Информатика
Есть ответ 👍

Определить, равна ли сумма двух первых цифр заданного четырехзначного числа сумме двух его последних цифр

127
379
Посмотреть ответы 3

Ответы на вопрос:

jula1985ozpajo
jula1985ozpajo
4,4(29 оценок)
Uses crt; var x: integer; begin       write('введи число: ');       readln(x);       if (x> =1000) and (x< =9999) then           if (x div 1000)+(x div 100 mod 10)=(x mod 10)+(x mod 100 div 10) then               writeln('yes')           else writeln('no')       else writeln('error'); end.
znaniyasveta
znaniyasveta
4,4(60 оценок)
Var str: string; begin readln(str); if ((ord(str[1])+ord(str[2])) = (ord(str[3]) + ord( then write('сумма равна')   else write('сумма неравна'); end.
данич36
данич36
4,4(73 оценок)
Тем что эл почта перодоется через интернет а об почта через почту в обоих случиях пишутся письмя и поздравление

Популярно: Информатика