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

0 голосов
14 просмотров

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


Информатика (72 баллов) | 14 просмотров
Дан 1 ответ
0 голосов

PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018


begin

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

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

end.


image
(5.8k баллов)