Прикреплена фотография только 6 задания, поэтому решил только его.
Var x,y,z:integer;
begin
x:=13;
y:=3;
z:=x;
x:=z div y;
y:=x;
writeln(x+' '+y+' '+z);
end.
Ответ
<span>3)x=4, y=4, z=13</span>
Оба имеют графическое представление. на пиктограмме может быть изабражено любое изображение. на символе только из таблицы символов
Var b,s:real;
begin
S := 3;
b := 0;
repeat
b := 2 + s + b;
s := s + 4;
until s=99;
writeln(b);
end.
................................