Главная Вход в систему Регистрация
Задать вопрос Консультации Пользователи Форум
О системе Помощь
Задать вопрос экспертам
Консультация № 141627
17.08.2008, 20:44
0.00 руб.
0 3 1
Компьютеры Программирование
Здравствуйте уважаемые эксперты! У меня возникла некоторая проблема, я не являюсь программистом, но так сложилось что мне необходимо написать программу, и возможно не одну...ничего другово как обратиться за помошью сюда, я не смог придумать.(зарание извеняюсь если допущю некоторые ошибки, так как я пишу с телефона при использовании оперы мини). Итак, текст задачи:
Имя входного файла-input.txt
Имя выходного файла-unput.txt
Оганичение по времени-2 сек.

Самолет взлетает в X(целое, 0=<X=<23) часов по местному времени в часовом поясе номер M (целое, 0=<M=<23). После полета в течении K (целое, 1=<K=<12) часов, он приземляется в часовом поясе номер N (целое, 0=<N=<23). Определите местное время в пункте назначения, считать что часовые пояса нумеруются с запада на восток.

Формат входного файла: в 1ой строчке текстового файла через пробел написаны числа X,M,K,N.

Формат выходного файла: в выходной файл требуется выдать местное время в пункте назначения в часах.

Зарание спасибо, в принципе мне нужен только код;-)

Обсуждение

давно
puporev
Профессор
401888
1232
18.08.2008, 05:51
общий
это ответ
Здравствуйте, Recount!
Создаете текстовый файл, лучше в одной папке с программой. Заполняете его по условию, сохраняете как INPUT. Кстати выходной файл у Вас наверное будет OUTPUT.
Пишите код. Нажимаете Ctrl+F9. В той же папке у Вас появится файл с ответом.
Код в приложении.

Приложение:
var x,m,k,n,y:integer;
f,g:text;
begin
assign(f,'input.txt');
reset(f);
assign(g,'output.txt');
rewrite(g);
read(f,x);
if (x<0)or(x>23)then
begin
writeln('nevernoe vremja vyleta!');
readln;
exit;
end;
read(f,m);
if (m<0)or(m>23)then
begin
writeln('nevernoe znachenie pojasa mesta vyleta!');
readln;
exit;
end;
read(f,k);
if (k<1)or(k>12)then
begin
writeln('nevernoe vremja poleta!');
readln;
exit;
end;
read(f,n);
if (n<0)or(n>23)then
begin
writeln('nevernoe znachenie pojasa mesta prileta!');
readln;
exit;
end;
y:=(x+k-m+n)mod 24;
write(g,y);
close(f);
close(g);
end.
Неизвестный
18.08.2008, 18:39
общий
Ммм....конечно я не понимаю программирование, но я просто вижу что в этом коде нет учета того ограничений того что часы - с 0 до 23 и т.п. То есть если ввести заведомо ложные данные то мы все равно получим ответ, причем не правильный, вроде...
давно
puporev
Профессор
401888
1232
18.08.2008, 19:06
общий
Внес изменения в ответ. Думал, раз данные из файла, то можно не проверять.
Еще ошибка в этой строке:
y:=(x+k-m+n)mod 24;
Форма ответа