Вопрос 3 Написать макрос, формирующий таблицу Пифагора в Excel для чисел от 1 до 10.
sub pifagor()
dim i,j as integer
for i=1 to 10
for j=1 to 10
workscheets(’Лист 1′) cells(i,j)
value=i*j
next
exit
end sub
sub pifagor()
dim i,j as integer
for i=1 to 10
for j=1 to 10
workscheets(’Лист 1′) cells(i,j)
value=i*j
next
exit
end sub
© ?????? �????????-???????????�., 2008. ??? ????? ????????.
??????????? ?????????? ?????? ??? ??????? ???????? ?????? ?? ????????.
Powered by WordPress