Заполните ячейки а1, а2, а3 электронной таблицы - вопрос №6824080123 от gilkin01 28.09.2021 06:45

Question

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

gilkin01 · Answer

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...