Напечатать перевод температуры из градусов по шкале Цельсия (С) в

градусы по шкале Фаренгейта (F) для значений температуры от 0

0 С до 400 С с

шагом 5

0 С. Формула перевода F=1,8 С+32.

Паскаль. Циклы с условием

Question

Игорка

2 августа, 21:29

+4

Ответы (1)

Знаете ответ на вопрос?

Даниша · Answer 1

var

C:integer;

begin

C : = 0;

while C < = 400 do

begin

writeln ('C = ', C, '; F = ', 1.8 * C + 32) ;

C : = C + 5;

end;

readln;

end.