Заполните ячейки а1, а2, а3 электронной таблицы - вопрос №6824982123 от Аноним1418 23.05.2022 21:27

Question

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

Аноним1418 · 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...