Предмет: Информатика,
автор: IlnarOfficial
Ввести с клавиатуры 10 чисел - положительных и отрицательных. Заменить все отрицательные числа их модулями и напечатать все полученные 10 чисел.
Это задача в паскале. Напишите саму программу пжл без массива
Ответы
Автор ответа:
0
// PascalABC.NET 3.2, сборка 1467 от 02.06.2017
// Внимание! Если программа не работает, обновите версию!
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
// Внимание! Если программа не работает, обновите версию!
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
Интересные вопросы
Предмет: Математика,
автор: ugolok12378
Предмет: Химия,
автор: kgaluzin55
Предмет: Физика,
автор: Seliverstovaaleksand
Предмет: Литература,
автор: RomashkaUla
Предмет: Математика,
автор: улыбочка12