1. Информатика
  2. Напишите программу для : определить

Напишите программу для : определить сумму цифр трехзначного числа кратных 4 на языке паскаль!

ВАС12237 ВАС12237    1   29.09.2019 19:30    1

Ответы
mrnikes2016 mrnikes2016  09.10.2020 03:36
PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018

begin

 ReadInteger('n->').ToString.JoinIntoString(' ').ToIntegers

                                                             .Where(t -> t mod 4 = 0).Sum.Println;

end.


Напишите программу для : определить сумму цифр трехзначного числа кратных 4 на языке паскаль!
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Pashtwt1 Pashtwt1  20.08.2019 11:50
Ск/р, много 5. какое сокращение используется для обозначения системы доменных имён? 7. с какой утилиты можно узнать настройки сети для своего компьютера (введите только название...
57862327685 57862327685  18.12.2020 00:00
нужно дополнить проект концепция города основанного на ИИ стоящими и уникальными идеями по различным пунктам во вложениях и в случае чего дополнить/подкорректировать уже имеющиеся...
Dexter8122 Dexter8122  25.09.2019 02:50
Паскаль var a, b: integer begin a: =2; b: =0; while a(ромб) 10 do begin a: =a+2; b: =b+3*a; end; write (b); end что будет в результате?...
novikdary14 novikdary14  20.10.2020 05:02
При всех значениях а значение выражения 2a(а - 18) - 3(a2 - 12а) - 5a2 - 3 равно 32а + 3а + 3...
kostetXD kostetXD  20.10.2020 05:02
255. Заполните таблицу: Значение ао112345Значение а+ 12Значение 16 - аПри каких значениях а:а) 16 - а меньше, чем a + 12;б) 16 - а больше, чем а+ 12;в) значения 16 - аиа + 12...
filinenok98 filinenok98  20.10.2020 05:02
На тренировках занимаются 12 баскетболистов, один из них капитан. Сколько может быть образованно тренером различных стартовых пятёрок, если капитан команды входит в эту пятерку?​...
ilonamoon2000 ilonamoon2000  20.10.2020 05:02
напишите программу для моделирования работы железнодорожного семафора, в котором попеременно мигают две красные лампочки. лампочки подключены к портам 10 и 11...
МагистрЕдаа МагистрЕдаа  20.10.2020 05:02
Попробуй это приложение! В миллионы школьников друг другу с уроками https://.app.link/qpzV02MawO​...
gogamer228 gogamer228  20.10.2020 05:02
Объём устройства= 2 МБ. Фото в формате *.jpg, занимает 3365 КБ, в формате *.png= 1537024 Б. Определите и объясните, какой документ поместится на данное устройство...
Dashboard18228 Dashboard18228  20.10.2020 05:02
В чём были достижения и просчеты центральной рады?...

Популярные вопросы