Пожалуйста помогите! Написать программу на Паскале, вычисления суммы S квадратов четных и кубов нечетных чисел от 1 до N. Проверку числа на четность осуществить с помощью встроенной функции ODD.
Ответы:
11-07-2014 14:41
const n = 3; var s,i : integer; begin for i := 1 to n do if odd(i) then s := s + i * i * i else s := s + i * i; writeln (s); end.
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Пожалуйста помогите! Написать программу на Паскале, вычисления суммы S квадратов четных и кубов нечетных чисел от 1 до N. Проверку числа на четность осуществить с помощью встроенной функции ODD.» от пользователя Юлия Моисеенко в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!