Массив содержит значения 5 температур в градусах - вопрос №82446985531111 от ывывывывыв 31.01.2020 02:26

Question

Информатика: Массив содержит значения 5 температур в градусах цельсия (тс): -5, -3, 1, 11, 19. составить программу перевода этих значений в кельвины (тк) и вывод их (тк=тс-273). pascal abc

ывывывывыв · Answer

Const Tc: array[1..5] of integer=(-5, -3, 1, 11, 19);
var i:integer;
begin
writeln(' Tc Tk');
for i:=1 to 5 do writeln(Tc[i]:2,' ',Tc[i]-273:5);
end.

Результат:
Tc Tk
-5 -278
-3 -276
1 -272
11 -262
19 -254