Требуется помощь в решении задачи в паскале
Создана: 07 Февраля 2010 Вск 18:27:14.
Раздел: "Нужна помощь"
Сообщений в теме: 6, просмотров: 1400
-
Форумчане помогите, есть простейшая задачка,нужно решить в паскале,я ее решил,написал саму прогу,но работать отказывается-пишет посотоянно: Арифметическое переполнение...
Текст задачи: Расстояние до ближайшей к Земле звезды - 4,3 световых года. Световой год - расстояние,которое свет проходит за год. Скорость света принять 300 000 км/с. Скорость земного звездолета 100 км/с. За сколько лет звездолет долетит до звезды?
Формула: (V1*365*24*60*60*n)/V2
Вот тело программы:
program pr2;
uses crt;
var V1,V2,n,t:double;
begin
writeln('Введите скорость света ');
readln(V1);
writeln('Введите скорость звездолета ');
readln(V2);
writeln('Введите расстояние до звезды');
readln(n);
t:= (V1*365*24*60*60*n)/V2;
writeln(t);
readln;
end. -
попробовал сейчас умножать на числа v1= 1 v2=2 n=3, программа считает только умножение,делить не делит...видимо поэтому и происходит арифметическое переполнение...еще такой вопрос: что нужно сделать чтобы при вводе дробного числа не выдавалась ошибка: "Ошибочный числовой формат"
-
-