|
|||
For j = 0 To 9. If i + j = j * i Then List1.AddItem (Str(a)). Решить задачи и записать в тетрадь ( условие задачи и код кнопки). Задача №1: вывести на экран все четырехзначные числа (образованные переменными K L M N ), если а) K*L = M* N. I +J +Y = ⇐ ПредыдущаяСтр 2 из 2 For j = 0 To 9 a = i * 10 + j If i + j = j * i Then List1.AddItem (Str(a)) Next j Next i
Самостоятельная работа: Решить задачи и записать в тетрадь ( условие задачи и код кнопки) Задача №1: вывести на экран все четырехзначные числа (образованные переменными K L M N ), если а) K*L = M* N б) K+L = M + N Задача №2: I +J +Y = I*I + J*J + Y*Y
|
|||
|