(33 ) перепишите программу на паскале, исправив ошибки: program massiv; var a: array(-10..10) of integer; begin for i: =1 to 20 do read(a[i]); for i: =1 to 20 do a[i]: =a[i]/10; for i: =1 to 20 do write(a[i]) end.
266
449
Ответы на вопрос:
Var a: array[-10..10] of real; i: integer; begin for i : = -10 to 10 do begin read(a[i]); a[i] : = a[i] / 10; write(a[i]+' '); end; end.
Популярно: Информатика
-
geliebtemutter31.05.2020 03:21
-
Sergovseznaet24.12.2022 07:58
-
юлька43807.08.2020 11:57
-
ksaro329.03.2021 14:48
-
nastya2017402.04.2022 07:46
-
spartanash22.04.2020 23:43
-
Fulfevgen27.04.2023 10:08
-
Suhih7707.11.2022 18:46
-
Гений161110.05.2020 06:14
-
249993027.12.2022 11:02