Информатика, опубликовано 2018-08-22 19:57:45 by Гость
Дан массив B15 поменять элементы на противоположные по знаку и вывести массив на экран
Ответ оставил Гость
Var b:array[1..15] of real;
i:integer;
begin
for i:=1 to 15 do read(b[i]);
writeln;
for i:=1 to 15 do begin b[i]:=-1*b[i]; write (b[i], ); end;
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.