1) даны а,b(целые) найти
сумму всех четных чисел в
диапозоне а до b
нкжно решить в паскале с
цикла с
параметром( for)
2)найти среднее
арифметическое от а до b(в
паскале с for)
​

pascalabc.net

1)

begin

  var (a, b) : = readinteger2('введите a, b: ');

  var s : = 0;

  for var i : = a to b do

    if i mod 2 = 0 then

      s += i;

  println(s)

end.

2)

begin

  var (a, b) : = readinteger2('введите a, b: ');

  var s : = 0;

  for var i : = a to b do

    s += i;

  println(s / (b - a + 1))

end.

•корпус компьютера с блоком питания мощностью 400 в — 2480 руб.; • процессор socket-амз amd phenom ii х4, 3,5 ггц — 5510 руб.; • материнская плата socket-амз asustek pci-e+gblan sata 4ddr-iii — 3300 руб. • модули оперативной памяти объемом 4 гбайта — 1330 руб.; • модули оперативной памяти объемом 4 гбайта — 1330 руб.; • жесткий диск объемом 500 гбайт — 3100 руб.; • жесткий диск объемом 1 тбайт — 3570 руб.; • видеокарта с объемом видеопамяти 1 гбайт — 2700 руб.; • звуковые колонки 5 в — 730 руб.; звуковая карта будет интегрирована в материнской её достаточно. • сетевая карта 10/100/1000 мбит/с — 570 руб.; • привод cd-rw/dyd-rw — 970 руб.; • монитор lcd, диагональ 19 дюймов — 3600 руб.; • мышь оптическая — 200 руб.; • клавиатура — 180 руб.; • принтер лазерный — 4630 руб.; в принципе этого достаточно.