Задать вопрос
18 октября, 00:54

Дано натуральное число. Верно ли, что сумма его цифр больше 10? Paskal

+1
Ответы (1)
  1. 18 октября, 02:49
    0
    Паскаль пишется как Pascal.

    var

    a, sum : integer;

    begin

    read (a) ;

    sum : = 0;

    while (sum 0) do

    begin

    sum : = sum + a mod 10;

    a : = a div 10;

    end;

    if sum > 10 then write ('Yes') else write ('No') ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Дано натуральное число. Верно ли, что сумма его цифр больше 10? Paskal ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы