//pascalabc.net 3.4.2
begin
var num : = readinteger('введите число: ').tostring;
if(num.sum(x -> strtoint(x)) in [10..99]) then
write('сумма цифр является двузначным числом,')
else
write('сумма цифр не является двузначным числом,');
if(num.contains('4')) or (num.contains('7')) then
write(' в записи этого числа есть числа 4 или 7.')
else
write(' в записи этого числа нет числа 4 или 7.');
end.
Поделитесь своими знаниями, ответьте на вопрос:
1. составить программу входе которой определяется входит ли цифры 4 или 7 в данной 2х значное число. 2.составить программу входи работы которой определяется является ли данное число кратное и оканчивающиеся на 3