Составь программу перевода градусов в интервале от 15 до 30 шкалы цельсия ** градусы...

0 голосов
44 просмотров

Составь программу перевода градусов в интервале от 15 до 30 шкалы цельсия на градусы фаренгейта
формула:F=C*1,8+32


Информатика (23 баллов) | 44 просмотров
Дан 1 ответ
0 голосов
Правильный ответ
// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  15.To(30).Tabulate(x->x*1.8+32).Println(NewLine)
end.

Результат
(15,59)
(16,60.8)
(17,62.6)
(18,64.4)
(19,66.2)
(20,68)
(21,69.8)
(22,71.6)
(23,73.4)
(24,75.2)
(25,77)
(26,78.8)
(27,80.6)
(28,82.4)
(29,84.2)
(30,86)
(150k баллов)