Program zadacha;vara: array[1..5] of byte;i,max: byte;beginmax:=0;for i:=1 to 5 do begin a[i]:=random(255); write(a[i]:4);end;writeln;
for i:=1 to 5 doif a[i]>max then max:=a[i];
writeln('max=',max);
end.
Var
a,b:real;
begin
readln(a,b);
writeln('y = ',sqrt(a)/(a+b));
end.
У вас ошибка в написании. Проверьте ещё раз.
Блок-схема дана во вложении
Растровые редакторы работают с пикселями, а векторные с графическими примитивами: линиями, фигур и пр.
Растровыми редакторами являются "Adobe Photoshop" и "Paint".
Ответ: "Adobe Photoshop" и "Paint".