СДЕЛАЙТЕ это программа для Паскаля

З клавіатури вводяться числа m та n (m — початок діапазону, п — його кінець). Потрібно знайти суму всіх парних чисел, які належать цьому діапазону. Для цього потрібно використати циклічні структури, оператори умови та функцію mod.

Anna11111199933445 Anna11111199933445    3   29.03.2020 17:20    0

Ответы
khavra1991 khavra1991  12.10.2020 08:31

===== PascalABC.NET =====

begin

 var (m, n) := ReadInteger2('Введите границы диапазона:');

 if m > n then  // если границы ввели "наоборот"

   Swap(m, n);

 Range(m, n).Where(p -> p.IsEven).Sum.Print

end.


СДЕЛАЙТЕ это программа для Паскаля З клавіатури вводяться числа m та n (m — початок діапазону, п — й
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика