1 2 3 4 5 6 7 8 | CLSINPUT "Pervoe chislo="; aINPUT "Vtoroye chislo="; bINPUT "Tretye chislo="; cIF a > 0 THEN a = a ^ 2IF b > 0 THEN b = b ^ 2IF c > 0 THEN c = c ^ 2PRINT "a="; a; " b="; b; " c="; c |
Тестирование выполнено в программе QB64 ( Скачать )