1) ПЕРЕВЕДИТЕ НА ПАСКАЛЬ
алг Ввод массива, вариант 1
вещ таб Т[1:12]
цел I
нач I:=1
пока I<=12, повторять
нц
вывод ("Т[," I , "]=")
ввод (Т[I])
I:=I+1
кц
кон
алг Ввод массива, вариант 2
вещ таб Т[1:12]
цел I
нач
для I от 1 до 12 шаг 1 повторять
нц
вывод ("Т[",I,"]= ")
ввод (Т[I])
кц
139
218
Ответы на вопрос:
program 1;
var i, dlina, shirina, visota, n, s, v : integer; beginwriteln(’введите число залов‘); readln (n); for i: =1 to n do beginwriteln(’введите длину,ширину и высоту зала‘); readln (dlina, shirina, visota); s: =dlina*shirina; v: =s*visota; writeln(‘площадь пола=’,s,’ объем зала=‘,v); endend.
если это 8-9 класс, то должно быть
Популярно: Информатика
-
Меруерт99913.02.2021 10:15
-
gptisveto04.07.2020 21:51
-
polatovskiy200213.06.2021 02:52
-
nikky228like13.05.2020 13:12
-
никита200521666509.04.2023 16:14
-
gfg9y06.07.2022 04:45
-
EmilN30417.08.2021 10:14
-
polcha200204.01.2023 00:39
-
Beario23.05.2021 04:41
-
бооой09.06.2023 23:15