С8 до 20 часов температура воздуха измерялась ежечасно, и результаты измерения заносились в компьютер. известно что в течении этого времени температура понижалась . напишите программу, определяющую , в котором часу была впервые отмечена отрицательная температура .
185
445
Ответы на вопрос:
Program temp; uses crt; var tem: array [8..20] of real; min: real; i: integer; begin for i: =8 to 20 do begin clrscr; writeln('vvedite temperaturu dlya ',i,' chasa zamera'); read(tem[i]); end; for i: =8 to 20 do if tem[i]< 0 then min: =i; writeln('vpervue otricatelnaya temperatura otmechena v ',min); readln; end.
Популярно: Информатика
-
maryanazarfdFj08.06.2021 20:38
-
sdgsdgsdgsdgsdg22831.03.2020 22:10
-
бог10000118.07.2020 16:59
-
SuperMan8725.06.2022 17:19
-
Владимир32819.04.2020 12:33
-
nagornaykisa21.03.2020 10:21
-
янивановсергеевич13.12.2020 13:32
-
Tenur11.07.2022 07:43
-
slivinskaja8322.12.2021 15:20
-
ra1si1ka110.02.2021 18:10