Найти сумму целых положительных двузначных чисел из промежутка а до б, кратных 3 и заканчивающихся на 2

olka11022000 olka11022000    1   17.09.2019 07:00    11

Ответы
влад2133 влад2133  07.10.2020 21:17
//PascalABC.NET 3.3,сборка 1627 от 27.01.2018

//Внимание! Если программа не работает, обновите версию!

begin

  var (a,b):=readinteger2('a,b-> ');

  var q:=a.Step; var t:=q.Take(b-a+1);

 var u:=t.Where(t->(t mod 3 = 0) and ( t mod 10 = 2)); u.sum.Println;

end.
Найти сумму целых положительных двузначных чисел из промежутка а до б, кратных 3 и заканчивающихся н
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика