Температура в градусац Цельсия изменяется от 0 до 100 с шагом 5. ...

Question

Температура в градусац Цельсия изменяется от 0 до 100 с шагом 5. ...

Moderator

Температура в градусац Цельсия изменяется от 0 до 100 с шагом 5. Написать программу перевода температуры из градусов Цельсия в градусы Фаренгейта(F). Формула перевода: F=1.8+32.

Есть ответ

17.12.2022

113

Ответ

Answer 1 · 17.12.2022

программа на паскале

var a: array [1..21,1..2] of real;i:integer;begin

a[1,1]:=0.0 ;for i:=2 to 21 doa[i,1]:=a[i-1,1]+5;for i:=1 to 21 doa[i,2]:=a[i,1]*1.8+32.0;for i:=1 to 21 dowriteln (a[i,1]:3:0,' celcia = ',a[i,2]:3:0,' farrengeit');readln;end.

Температура в градусац Цельсия изменяется от 0 до 100 с шагом 5. ...

Ответ

программа на паскале var a: array [1..21,1..2] of real;i:integer;begin a[1,1]:=0.0 ;for i:=2 to 21 doa[i,1]:=a[i-1,1]+5;for i:=1 to 21 doa[i,2]:=a[i,1]*1.8+32.0;for i:=1 to 21 dowriteln (a[i,1]:3:0,' celcia = ',a[i,2]:3:0,' farrengeit');readln;end.

программа на паскале

var a: array [1..21,1..2] of real;i:integer;begin

a[1,1]:=0.0 ;for i:=2 to 21 doa[i,1]:=a[i-1,1]+5;for i:=1 to 21 doa[i,2]:=a[i,1]*1.8+32.0;for i:=1 to 21 dowriteln (a[i,1]:3:0,' celcia = ',a[i,2]:3:0,' farrengeit');readln;end.