Program z8; Var a:integer;Begin write('Введите число - '); readln(a); if (a > 0) then write('Число ',a,' в кубе - ',a*a*a) else if (a < 0) then write('Вы ввели отрицательное число') else write('Вы ввели 0'); End.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
