Регистрация
vikaplmplmpl
08.02.2020 00:24
Информатика
Есть ответ 👍

Написать программу на паскале, вычисления суммы s квадратов четных и кубов нечетных чисел от 1 до n. проверку числа на четность осуществить с встроенной функции odd.

217
415
Посмотреть ответы 2

Ответы на вопрос:

GevorgStepanyan
GevorgStepanyan
4,5(54 оценок)
  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.
pep4
pep4
4,5(42 оценок)
If (a mod b < > 0) then writeln('не делится! ');

Популярно: Информатика