Опубликовано 03.01.2018 по предмету Информатика от Гость

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

Ответ оставил Гость

begin
  var s: string;
  var i, k: integer;
  readln(s);
  try
    foreach c: char in s do
      k += Byte.Parse(c);
    writeln(k);
  except
    on System.FormatException do
        writeln(Введи число -_-);
    else writeln(Ошибка);
  end;
end.

Не нашел нужный ответ?

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.


Найти другие ответы
Самые новые вопросы