Заполните ячейки а1, а2, а3 электронной таблицы любыми числами. составьте программу на языке vba, которая замениткаждое из этих чисел квадратным корнем из числа. отрицательные числа замените текстом "преобразование невозможно".

saraavetisyan2 saraavetisyan2    1   18.08.2019 11:10    1

Ответы
kira310 kira310  26.08.2020 06:18
Sub koren()For i = 1 To 3If Cells(i, 1) < 0 ThenCells(i, 1) = "Преобразование невозможно"ElseCells(i, 1) = Sqr(Cells(i, 1))End IfNext iEnd Sub
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика