В Turbo Pascal создать програму «Порахувати суму цифр» —

51

В Turbo Pascal создать програму «Порахувати суму цифр» —

категория: информатика

ответить

в избранное

48

inginiar

08 сентября 2022

vara,n: integer; beginread (a); while a <> 0 do beginn: =n+a mod 10; a: =a div 10; end; write ('summa zifr=', n) end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Смотрите также:

Помогите отметить верные рассуждения Галилей открыл два спутника Юпитера с Земли с помощью телескопа

Число N натуральное (2/1)+(3/2)+(4/3)+… . (N+1) /N) Составить программу

Опишите примеры использования моделей для: обьяснения известных фактов…

Два известных факта относящиеся к свойствам объектов

Закончи предложения так, чтобы они: а) стали суждениями: — Исполнитель ________________________________

Составить алгоритм решения уравнения AX=B для произвольных чисел А и В

Найти сумму кубов чисел от а до в. Если а введено меньше в, то в поле вывода ответа сообщить об этом

Количество единиц в записи десятичного числа 253 в двоичной системе счисления соответствует числу…?

Сколько CD объемом 700 Мбайт потребуется для размещения информации, полностью занимающей жесткий диск емкостью 120Гбайт?

27400

14822

Английский язык

14216

Биология

7369

720

Экономика

18829

8304

География

15850

Геометрия

5255

Информатика

11818

23332

15992

Литература

73118

Математика

8152

Обществознание

466

Правоведение

46271

Русский язык

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!

Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!

Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...