Помогите пожалуйста написать программу, язык Pascal?

Информатика | 10 - 11 классы

Помогите пожалуйста написать программу, язык Pascal.

Ввести целое положительное число трехзначное число N.

Разбить это число на разряды (найти число сотен, десятков и единиц).

Найти сумму разрядов числа N.

Ответить на вопрос
Ответы (1)
Диас54321 25 нояб. 2021 г., 09:38:35

Program razrad ; var n, a, b, c, s : integer ;

begin write('введите положительное трехзначное число - ') ; readln(n) ; a : = n mod 10 ; {последняя цифра} b : = (n div 10)mod 10 ; {средняя цифра} c : = n div 100 ; {первая цифра} writeln('сотен - ', с, ', десятков - ', b, ', единиц - ', a) ; s : = a + b + c : writeln('сумма цифр числа - ', s)

end.

Adagio1 15 апр. 2021 г., 02:59:47 | 5 - 9 классы

В turbo pascal : Дано трехзначное число?

В turbo pascal : Дано трехзначное число.

Написать программу осуществляющую вывод этого числа в обратном порядке.

Omoonon 11 мая 2021 г., 17:07:33 | 10 - 11 классы

ДАЮ 29 баллов?

ДАЮ 29 баллов.

ПОМОГИТЕ, ПОЖАЛУЙСТА, НАПИСАТЬ ПРОГРАММУ и БЛОК - СХЕМУ : ввести целое число и найти сумму его цифр.

SofaKo18 30 авг. 2021 г., 22:35:10 | 10 - 11 классы

Вводится десятичное число?

Вводится десятичное число.

Написать программу, которая вычесляет количество десятков и единиц в вводимом числе.

Программа должна вывести на экран сообщение : "в числе десятков = , в числе единиц = ".

Tyison83 1 сент. 2021 г., 11:08:05 | 10 - 11 классы

СРОЧНО СРОЧНО СРОЧНОПОЖАЛУЙСТА ПОМОГИТЕвводится десятичное число?

СРОЧНО СРОЧНО СРОЧНО

ПОЖАЛУЙСТА ПОМОГИТЕ

вводится десятичное число.

Написать программу, которая вычесляет количество десятков и единиц в вводимом числе.

Программа должна вывести на экран сообщение : "в числе десятков = , в числе единиц = ".

Аааа10пвп 6 июл. 2021 г., 23:14:00 | 10 - 11 классы

Вводится десятичное число?

Вводится десятичное число.

Написать программу, которая вычесляет количество десятков и единиц в вводимом числе.

Программа должна вывести на экран сообщение : "в числе десятков = , в числе единиц = ".

Papap2 18 мар. 2021 г., 05:02:00 | 5 - 9 классы

Дано натуральное трехзначное число a?

Дано натуральное трехзначное число a.

Сформировать число b, такое что : число сотен в нем равнялось бы сумме цифр числа единиц и десятков числа а, десятков в b равно увеличенному на 2 числу десятков в числе а, а вместо единиц поставить цифру 0.

С + +.

Irisha9294 17 мая 2021 г., 20:36:23 | 10 - 11 классы

Составить программу в Pascal :Найти все трехзначные числа, обладающие следующими свойствами : - сумма цифр числа А делится на 4 ; - сумма цифр числа А + 2 также делится на 4?

Составить программу в Pascal :

Найти все трехзначные числа, обладающие следующими свойствами : - сумма цифр числа А делится на 4 ; - сумма цифр числа А + 2 также делится на 4.

Pashatolokinbkru 6 июн. 2021 г., 02:46:46 | 10 - 11 классы

Составить программуввести три целых числа и найти наибольшее из них?

Составить программу

ввести три целых числа и найти наибольшее из них.

Пример : введите три числа

4 15 9

наибольшее число 15.

Svietlananiekr1 25 июл. 2021 г., 17:55:53 | 5 - 9 классы

Дано целое четырёхзначное число?

Дано целое четырёхзначное число.

Определить количество сотен, десятков и единиц.

Помогите, пожалуйста!

Программа на языке паскаль.

3613101211 23 дек. 2021 г., 03:16:59 | 5 - 9 классы

Из всех трехзначных чисел найти те у которых сумма числа сотен и числа десятков равна 7?

Из всех трехзначных чисел найти те у которых сумма числа сотен и числа десятков равна 7.

Срочно!

Пожалуйста!

Паскаль.

На этой странице вы найдете ответ на вопрос Помогите пожалуйста написать программу, язык Pascal?. Вопрос соответствует категории Информатика и уровню подготовки учащихся 10 - 11 классов классов. Если ответ полностью не удовлетворяет критериям поиска, ниже можно ознакомиться с вариантами ответов других посетителей страницы или обсудить с ними интересующую тему. Здесь также можно воспользоваться «умным поиском», который покажет аналогичные вопросы в этой категории. Если ни один из предложенных ответов не подходит, попробуйте самостоятельно сформулировать вопрос иначе, нажав кнопку вверху страницы.