Валентин
5 год назад
Ввести с клавиатуры 10 чисел - положительных и отрицательных. Заменить все отрицательные числа их модулями и напечатать все полученные 10 чисел.Это Задание в паскале. Напишите саму программу пжл без массива
ОТВЕТЫ
Vladimir
Oct 24, 2020
begin
ReadSeqInteger('Вводите:',10).Select(x->Abs(x)).Println
end.
Вводите: -42 5 0 217 23 -5 -152 24 17 41
42 5 0 217 23 5 152 24 17 41
497
Смежные вопросы:
