Предмет: Информатика,
автор: paparmama
программа в pascal, переводящая градусы цельсися в градусы фаренгейта и градусы кельвина.f=1.8c+32 , где f-градусы фаренгейта, с-градусы цельсия.k=c+273,где k-градусы кельвина,с-градусы цельсия
Ответы
Автор ответа:
0
var
c, k, f: real;
begin
Write('Введите температуру в градусах Цельсия: ');
Readln(c);
k := c + 273;
f := 1.8 * c + 32;
Writeln('По шкале Кельвина: ', k:0:1, ', по шкале Фаренгейта: ', f:0:1)
end.
Тестовое решение:
Введите температуру в градусах Цельсия: 36.6
По шкале Кельвина: 309.6, по шкале Фаренгейта: 97.9
c, k, f: real;
begin
Write('Введите температуру в градусах Цельсия: ');
Readln(c);
k := c + 273;
f := 1.8 * c + 32;
Writeln('По шкале Кельвина: ', k:0:1, ', по шкале Фаренгейта: ', f:0:1)
end.
Тестовое решение:
Введите температуру в градусах Цельсия: 36.6
По шкале Кельвина: 309.6, по шкале Фаренгейта: 97.9
Автор ответа:
0
что означает f:0:1 и k:0:1?
Автор ответа:
0
ясно, спасибо)
Похожие вопросы
Предмет: Алгебра,
автор: dashakhrenkova
Предмет: Физика,
автор: sonypalivoda
Предмет: Қазақ тiлi,
автор: Аноним
Предмет: Алгебра,
автор: Ефим21
Предмет: Алгебра,
автор: timebirds546