Даю 24 балла. даны три числа. Составьте программу,которая вычисляет кубическую степень отрицательных среди этиз чисел
Даю 24 балла. даны три числа.
Составьте программу,которая вычисляет кубическую степень отрицательных среди этиз чисел
Гость
Ответ(ы) на вопрос:
Гостьvar
a:array [1..3] of integer;
i:integer;
begin
for i:=1 to 3 do read(a[i]);
for i:=1 to 3 do
if a[i]<0 then write(a[i]*a[i]*a[i],' ');
end.
Не нашли ответ?
Похожие вопросы