Nezh
4 год назад
Перепишите программу на Паскале, исправив ошибки:Program massiv;Var a:array(-10..10) of integer;BeginFor i:=1 to 20 DoRead(a[i]);For i:=1 to 20 Doa[i]:=a[i]/10;For i:=1 to 20 DoWrite(a[i])End.
ОТВЕТЫ
Поликарп
Oct 24, 2020
Программа на скрине! Надеюсь помог!
- Помоги пожалуйста ещё 2 задачи мои решить , в разделе - информатика за 20 баллов.
464
Смежные вопросы:
