6.вывести на экран таблицу перевода температуры из градусов по шкале цельсия (с) в градусы по шкале фаренгейта (f) для значений от 0ос до 30oс с шагом 2ос (перевод осуществляется по формуле f = 1,8∙c + 32). ( конструкція while)
168
173
Ответы на вопрос:
на паскале
vara,b: array [0..15] of real;
i: integer; begin
for i: =0 to 15 doa[i]: =i*2;
for i: =0 to 15 do beginb[i]: =1.8*a[i]+32; writeln(a[i],' градуса(ов)','=',b[i],' по фаренгейту'); end;
end.
вот еще через while
vara,b: array [0..15] of real;
i: integer; begin
for i: =0 to 15 doa[i]: =i*2;
i: =0; while i< =15 do beginb[i]: =1.8*a[i]+32; i: =i+1; end; for i: =0 to 15 dowriteln(a[i],' градуса(ов)','=',b[i],'по фаренгейту'); end.
Популярно: Информатика
-
KetZu26.05.2020 06:37
-
AnnaFruzanna27.04.2020 03:48
-
unisens10.02.2022 07:57
-
elizavetanosova200017.09.2020 14:33
-
karapyz3223.07.2020 05:00
-
armanbolat9818.06.2022 18:55
-
никита434209.02.2022 22:31
-
гоша20618.09.2022 10:39
-
malinka121206.11.2020 15:06
-
14умник08.06.2021 12:59