Предмет: Информатика,
автор: chesnovskay
Составьте программу , выводящую на экран все чиста от -10до10, а также их модули
Ответы
Автор ответа:
0
// PascalABC.NET 3.3, сборка 1542 от 05.10.2017
// Внимание! Если программа не работает, обновите версию!
begin
Range(-10,10).Foreach(i->Println(i,Abs(i)))
end.
Результат
-10 10
-9 9
-8 8
-7 7
-6 6
-5 5
-4 4
-3 3
-2 2
-1 1
0 0
1 1
2 2
3 3
4 4
5 5
6 6
7 7
8 8
9 9
10 10
// Внимание! Если программа не работает, обновите версию!
begin
Range(-10,10).Foreach(i->Println(i,Abs(i)))
end.
Результат
-10 10
-9 9
-8 8
-7 7
-6 6
-5 5
-4 4
-3 3
-2 2
-1 1
0 0
1 1
2 2
3 3
4 4
5 5
6 6
7 7
8 8
9 9
10 10
Похожие вопросы
Предмет: Физика,
автор: pedik22896akarulit25
Предмет: Қазақ тiлi,
автор: iskandarovamir9
Предмет: Литература,
автор: MikAndLandgelo
Предмет: Математика,
автор: Stellalone