Задать вопрос
26 августа, 00:21

Паскаль. Найти сумму четных чисел от 15 до 100.

+5
Ответы (2)
  1. 26 августа, 02:50
    0
    begin

    Range (15, 100). Where (el - > el. IsEven). Sum. Println;

    end.
  2. 26 августа, 03:54
    0
    var

    i, k: integer;

    begin

    k : = 0;

    for i:=15 to 100 do if i mod 2 = 0 then k:=k+i;

    write (k) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Паскаль. Найти сумму четных чисел от 15 до 100. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике