Задать вопрос
30 июля, 14:54

Ребяят, нужно найти сумму цифр четырехзначного числа и записать в паскале

+4
Ответы (1)
  1. 30 июля, 17:34
    0
    Begin

    var s:=readstring () ;

    if s. Length=4 then

    write (strtoint (s[1]) + strtoint (s[2]) + strtoint (s[3]) + strtoint (s[4])) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Ребяят, нужно найти сумму цифр четырехзначного числа и записать в паскале ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы