4) Даны три числа. Возвести в куб те из них, которые нечетны. Остальные оставить без изменения.
4) Даны три числа. Возвести в куб те из них, которые нечетны. Остальные оставить без изменения.
Гость
Ответ(ы) на вопрос:
Гостьvari:integer;a: array [1..3] of integer;beginfor i:= 1 to 3 do readln (a[i]); if a[i] mod 2 = 1 then a[i]:= a[i]*a[i]*a[i];end.
Не нашли ответ?
Похожие вопросы