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

Напечатать таблицу перевода температуры из градусов по шкале Цельсия (С) в градусы шкалы Фаренгейта (F) для значений от 15оС до 30оС с шагом 1оС. (перевод исполняется по формуле F=1.8C+32). Два варианта с циклами WHILE и REPEAT UNTIL.

Задать свой вопрос
1 ответ

Ответ:

'Pascal'

Разъясненье:

uses crt;

var F:real;

C:integer;

  Begin

  For C:=15 to 30 do

     Begin

     F:=1.8*C+32;

  Writeln(C,' градусов Цельсия = ', F, ' градусов по Фаренгейту');

  End;

End.

Данил
можно в WHILE и REPEAT UNTIL. либо желая бы в одном из их
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт