Var
a,b,c,d:integer;
begin
writeln('Введите первое число');
readln(a);
writeln('Введите второе число');
readln(b);
writeln('Введите третье число');
readln(c);
writeln('Введите четвертое число');
readln(d);
writeln('Среднее четырех чисел = ',(a+b+c+d)/4)
end.
6 первый ответ один
6 второй ответ ноль
201 206 213 207 209 205 192 211 201 203 192 - информатика
Uses crt;
var
a,b,i,k: longint;
begin
writeln('введите 2 числа');
read (a,b);
k:=0;
for i:=a to b do
if i mod 2 = 0 then
k:=k+i;
writeln(сумма четных чисел от ', a,' до ', b,' равна ',k)
<span>end.</span>
Div- деление нацело( отбрасываем дробную часть)
Mod - деление с остатком( отбрасываем целую часть)
1) 10 div 5=2
2) 5 mod 3=2
3) 100 div 20=5
4) 4 mod 1=0
5) (10 mod 3)*(11 mod 2)=1