Var i,s:integer;
begin
s:=0;
for i:=20 to 450 do
if (i mod 4 = 0) then s:=s+i;
writeln(s);
end.
там надо из 100 десять раз вычесть 5
получится 50
Миг мир пир пар бар бас бес вес Век
Море горе гора кора кома кума (саша или сума) Суша
#include<iostream>
#include<cstdlib>
#include<locale>
#include<ctime>
using namespace std;
int main()
{
<span> setlocale(LC_ALL, "Russian");</span>
<span> srand(time(NULL));</span>
<span> int min_value, max_value;</span><span>
int mas[10];</span>
// инициализируем массив случайными числами
<span> for(int i=0; i<10; i++) mas[i] = rand()%100;</span>
<span>
//находим минимальное значение</span><span>
min_value = mas[0];</span><span>
for(int i=0; i<10; i++)</span><span>
if(min_value > mas[i]) min_value = mas[i];</span>
<span>
cout << "Минимально значение: " << min_value << '\n';</span>
<span>
//находим максимальное значение</span><span>
max_value = mas[0];</span><span>
for(int i=0; i<10; i++)</span><span>
if(max_value < mas[i]) max_value = mas[i];</span>
<span> cout << "Максимальное значение: " << max_value << '\n';</span>
<span>
//выводим среднее значение максимального и минимального значение</span><span>
cout << "Среднее значение: " << (double) (min_value+max_value)/2 << '\n';
</span><span>}</span>
Очимточки в корзине
новерно