Блог для маленьких школьников и их родителей
ШколаЛа

Написать программу вычисления суммы кубов всех четных чисел от 4 до 14. Pascal

Автор:
Предмет: Информатика
Уровень: 5 - 9 класс

Написать программу вычисления суммы кубов всех четных чисел от 4

до 14.

Pascal

Ответов к вопросу: 1
  • elibekovdamir
    14.06.2024 | 18:51

    Ответ:

    Program p1;
    Var i,  k: integer;
    Begin
    k:=0;
    For i:=4 to 14 do begin
    if (i mod 2 =0) then k:=k+i*i*i;
    end;
    Writeln(‘Сумма кубов всех четных чисел от 4 до 14 — ‘,k);
    End.

Ответить на вопрос:
:p :-p 8) 8-) :lol: =( :( :-( :8 ;) ;-) :(( :o:
Нажимая на кнопку я даю согласие на обработку персональных данных и принимаю политику конфиденциальности.