получить таблицу температур, используя подпрограмму-функцию и массивы Опции

[Ksenia]

Разроботать алгоритм решения задачи, составить блок-схему и запрограммировать решение на языке Паскаль, используя подпрограмму-функцию и массивы. необходимо получить таблицу температур по цельсию от 0 до 20 градусов с шагом в один градус цельсия и их эквивалентов по шкале Фаренгейта, используя для перевода формулу:
Tf=(9/5)Tc+32.

Пожалуйста, помогите !!!
Мы это в школе давно очень проходили, уже не помню...
Заранее спасибо.

[Krjuger]

DarkWishmaster,сорь что лезу,но топикстартер говорил про 2 х 20 а ты сделал 5 х 4,хотя согласен меняется это не шипко сложно.

Единственное,что я не понял,почему исходный массив(в цельсиях) у тебя типа байт,а для фаренгейта уже реал?И еще раз извиняюсь,если обижу,но зачем тебе вообще массив а,если тебе он абсолютно не нужен.Вывод на экран можно сделать аналогично тому, как ты заполняеш оба массива,либо как нибудь так

for i:=1 to 5 do
for j:=1 to 4 do 
    begin
       write(20-number);
       dec(number);
       writeln(b[i,j]:3 :2);  //ошибка из за тэга
  end;

[DarkWishmaster]

DarkWishmaster,сорь что лезу,но топикстартер говорил про 2 х 20 а ты сделал 5 х 4,хотя согласен меняется это не шипко сложно.

Единственное,что я не понял,почему исходный массив(в цельсиях) у тебя типа байт,а для фаренгейта уже реал?И еще раз извиняюсь,если обижу,но зачем тебе вообще массив а,если тебе он абсолютно не нужен.Вывод на экран можно сделать аналогично тому, как ты заполняеш оба массива,либо как нибудь так

for i:=1 to 5 do
for j:=1 to 4 do 
    begin
       write(20-number);
       dec(number);
       writeln(b[i,j]:3 :2);  //ошибка из за тэга
  end;

Ну Цельсий же шагом в 1, из интервала [1,20] тут тип байт подходит, а фаренгейт он по формуле уже действительное число, так и поставил реал.
Ты прав, тут вообще массив не нужен, я не подумал, прочитал условие и там массив и мысль в другую сторону улетела.
Можно просто так:

 for i:=1 to 20 do
  begin 
  write(i,' ');
  writeln(TF(i):2 :2);
end;

Сообщение отредактировано: DarkWishmaster - 7.06.2011 21:54