Объяснение:
с вишнями
там по количеству идёт : три два один три...
а по цвету чередуются
т.е далее будет 3желтых,2красных и одна желтач
7X очень легко и просто надо просто подумать)
<span>это уменьшенная копия оригинала
</span><span>это копия оригинала, обладающая всеми его свойствами</span>
Program v;
var x, y: integer;
begin
readln(x);
readln(y);
if(x<y) then writeln(x);
else writeln(y);
end.
1) r=187,5
a=9
d=63
2) var a,b,c,d,e:integer;
sr:real;
begin
writeln('Оценка за первый опрос');
read(a);
writeln('Оценка за второй опрос');
read(b);
writeln('Оценка за третий опрос');
read(c);
writeln('Оценка за четвертый опрос');
read(d);
writeln('Оценка за пятый опрос');
read(e);
sr:=(a+b+c+d+e)/5;
writeln('Среднее значение равно ',sr);
end.
3)var a,b,d, dengi,ostatok: integer;
begin
writeln('Количество денег у человека');
read(dengi);
writeln('Стоимость перчаток');
read(a);
writeln('Стоимость портфеля');
read(b);
writeln('Стоимость галстука');
read(d);
ostatok:=dengi-a-b-d;
writeln('Остаток от изначальной суммы равен ',ostatok);
end.