option explicit
dim s,k,i,j,max,min,a
privat sub cmdstart_click()
pic1.cls
redim a(1 to 5,1 to 3)
pic1.scale(0,0)-(5+1,3+1)
randomize:pic1.forecolor=vbblue
for i=1 to 5
for j=1 to 3
a(i,j)=int(rnd*100):pic1.currentx=j
pic1.currenty=i:pic1.print a(i,j)
next
next
max=a(1,1)
min=a(1,1)
for i=1 to 5
for j=1 to 3
if a(i,j)>max and a(i,j)<min then
end if
next
next
pic1.forecolor=vbred:pic1.print max, min
end sub
Program Question;
var
nameF, nameS, rels :string;
Begin
Write('Введите первое имя: ');
Readln(nameF);
Write('Введите второе имя: ');
Readln(nameS);
Write('Введите отношения: ');
Readln(rels);
Writeln(nameF, '+', nameS, '=', rels);
End
Это всё одно и тоже, потому что компьютерный специалист и программист это одно и тоже
а комплексы не знаю как это относится к другим
Устройсвом для подключения компьютера к сети является монитор и мышь
Тип текста; размер текста; жирный, курсивный, подчёркнутый текст; расположение текста.
Вроде бы легко!