Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.05.2012, 12:45   #1
istavzev
Пользователь
 
Аватар для istavzev
 
Регистрация: 05.04.2012
Сообщений: 10
По умолчанию Перевод на Си

Помогите перевести код на паскале на код Си
Код:
uses crt;
const n=20;
      m=30;
 
var i:integer;
    min,cur:real;
    f:text;
    ch:char;
 
begin
clrscr;
assign(f,'2.txt');
reset(f);
read(f,ch);
case ch of
'i': begin
     read(f,min);
   for i:=1 to N-1 do
      begin
       read(f,cur);
       if cur<min then min:=cur;
      end;
     end;
 
'r': begin
      read(f,min);
     for i:=1 to M-1 do
      begin
       read(f,cur);
       if cur<min then min:=cur;
      end;
     end;
istavzev вне форума Ответить с цитированием
Старый 23.05.2012, 21:04   #2
istavzev
Пользователь
 
Аватар для istavzev
 
Регистрация: 05.04.2012
Сообщений: 10
По умолчанию

Помогите с заданием добрые люди)
istavzev вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Перевод из C++ в C# s-mario Помощь студентам 3 26.10.2011 18:02
Перевод из C++ в C# prod Помощь студентам 1 04.10.2011 17:00
Перевод FVGK-2009 Visual C++ 5 26.10.2010 07:54
перевод ZET78 Общие вопросы C/C++ 1 03.05.2010 08:51
Перевод из Кб в Мб и т.д. okgo Паскаль, Turbo Pascal, PascalABC.NET 8 18.11.2008 21:03