Задать вопрос
ИнформатикаИнформатика
30 января, 08:15

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

+3
Ответы (2)
  1. 30 января, 08:21
    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.
  2. 30 января, 09:15
    0
    begin

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

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Паскаль. Найти сумму четных чисел от 15 до 100. ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы
Помоги с ответом
3) Площадь треугольника ЕОТ равна 24 см в квадрате. Треугольник АВС подобен треугольнику МКТ и его площадь равна 6 см квадратных. НАйдите комэффициент подобия и сторону ОТ треугольника ЕОТ, если ВС=8 см и угол А=Углу Е
Нет ответа
Что из перечисленного соответствует вертикальной мобильности: 1 понижение в должности 2 переход из одной школы в другую 3 переезд в квартиру большей площади 4 назначение рабочего мастера 5 переизбрание депутата на второй срок 6 получение
Нет ответа
Мотоциклист начинает движение из состояния покоя. Через 30 с он достигает скорости 54 км/ч. С каким ускорением происходит движение?
Нет ответа
6 целых 2/3 - (x+1/4) = 2 целых1/6 помогите с решением
Нет ответа
Упростить выражение а) 14 с-14b+10b-4c= б) 5 (х-3) + 10= в) 5 а + (а-4) - 2 а-3= г) 4 (х-5) - 2 (х+3) =
Нет ответа
Главная » Информатика » Паскаль. Найти сумму четных чисел от 15 до 100.
Регистрация Забыл пароль