Дано значение расстояния в метрах. Составить программу, определяющую больше ли это...

Question

Дано значение расстояния в метрах. Составить программу, определяющую больше ли это расстояние чем 100 км.

Answer 1

Если в паскале то
Program fhfhjhf;
var a , a1  :integer ;
begin
Writeln('апиши число');
Readln(a);
Writeln('Найдем число');
a1 = a*0.001;
If a1>100 then writeln('Конечно больше')
else Writeln('Конечно меньше');
Writeln('Не за что');
end.

Comments

спасибо большое)))

---

не за что

---

чуваааааак, сос, паскаль пишет,что это нифига не правильно

---

Program1.pas(7) : Встречено '=', а ожидалось ';'

---

что делать???????????

---

попробуй програм переписать название и проверь наличие ; везде кроме БЕГИН