| Автор | помощь по паскале |
|---|
program klass
;var a, b, s:real;
begin
write ('a:');
write ('b:');
s:=a*b;
read (s);
end.
вот ето чудо компилируется на ура, но при выполнении выдает следующее сообщение ошибка 105 по адресу 0001:003с
Что нужно зделать для работоспособности
НАбрано в Turbo pascal for Windows |
для NeoTj:
;var a, b, s:real;
зачем закомменчено?)
program klass
; пропустил) |
| Uses crt забыл. |
| все равно есть ошибка при выполнении |
program klass;
uses crt;
var a, b, s:real;
begin
write ('a:');
write ('b:');
s:=a*b;
read (s);
end.
Такую запускаешь, да? |
Не слушай первых 2ух, они сами то нубы!
Read - читать с консоли, write - вывод на экран, а у тебя всё наоборот!
program klass;
var a, b, s:real;
begin
read (a);
read (b);
s:=a*b;
write (s);
end. |
для NeoTj:
Тебе надо программа на вывод произведения двух чисел?) |
program klass;
var a, b, s:real;
begin
read(a, b);
s:=a*b;
writeln (s);
end.
Все.Только почему в турбо паскале?) скачай паскаль ABC:) |
| для Self-Deception:файл crt не найден |
s:=a*b;
Ты что перемножать-то собрался?) |
uses crt;
у меня и без этого работает
скачай паскаль ABC:)
или Free Pascal |
скачай паскаль ABC:)
А вот такое г-но советовать не надо... |
для TreeRide:
всеравно после успешной компиляции при выполнении программы видает ошибку |
| да кстати что похожее делал в АЛГО то там получалось только результат какой то странный был, а здесь не могу даже запустить( |
да кстати что похожее делал в АЛГО то там получалось только результат какой то странный был, а здесь не могу даже запустить(
4.8400000000E+10, такой?
И да, у меня все нормально работает. И ошибка 105 утт вообще не должна появляться. |
для Self-Deception:
ага гдето так |
для NeoTj:
Так это число в том виде, в котором оно в памяти хранится. Поэтому нужно указывать число значащих цифр числа и число дробных цифр при выводе, например, так:
Write(x:10:5); |
| А паскаль у тебя какой-то странный, у меня и вариант программы в 1 посте нормально работает. |
для Self-Deception:
русифицированый, щя попробую 7.0 скачать |
| в 7,0 все работает спс за советы |
| тема закрыта by NeoTj (2012-03-14 00:16:26) |
|---|
