Ответ(ы) на вопрос:
Гостьvara:array[1..10] of integer;i:integer; beginfor i:=1 to 10 doread(a[i]);for i:=1 to 10 doif a[i]<0 then a[i]=abs(a[i]);for i:=1 to 10 dowrite(a[i]);end.
Не нашли ответ?
Похожие вопросы