Домашние задания: Информатика

Помогите найти ошибки в программировании на языке паскаль

Тут я вижу всего 3 ошибки - и все они насчет точек с запятыми. После then и после else точка с запятой не ставится. А вот после readln - нужна - т.к. практически все строки должны оканчиваться точкой с запятой. Исключение - begin и последнее end. А так же точка с запятой не ставится перед else. Ну и еще немного некорректное по смыслу условие - A>=0 означает, что A больше или равно 0, а 0 не является ни положительным, ни отрицательным числом.

Ну а сама программа написана топорно и несколько неумело. Вот более правильный вариант:
 Program Number1; 
uses crt;
var a: real;
begin
clrscr;
writeln ('Введите с клавиатуры любое число, после чего нажмите клавишу Enter. Если вводите дробное число, то целую часть от дробной отделите точкой, а не запятой.');
write ('Введите любое число: ');
readln (a);
if a>0 then writeln ('Вы ввели положительное число.') else
if a
Анастасия Щур
Анастасия Щур
43 559
Лучший ответ
Виточка Самоткал Исключений многовато :-)
В Паскале точка с запятой - не часть оператора, а разделитель операторов. Поэтому после последнего в блоке она не нужна. Раньше компиляторы даже на это ошибку выдавали.
не вижу некоторых знаков препинания....

 program number;  
var A:real;
begin

Write ('Введите число A: ');

readln(A);

if A>=0 then

Writeln ('Вы ввели положительное число')

else

Writeln ('Вы ввели отрицательное число');

readln;

end.

Объяснение:
1) readln(A); - это ввод значения, а не вывод на экран, кавычки ненужны
2) if A>=0 then - это начало условия, конец задавать ещё слишком рано
3) else - тоже самое, ещё рано задавать конец
4) readln; - в данном случае оставляем консоль открытой чтоб посмотреть ход выполнения программы, конец строчки тут нужно вводить, т.к. команда закончила выполнение

Более подробно я не напишу, т.к. я не знаю как объяснять ошибки. Ошибка - есть ошибка, она либо есть либо нет. Наличие ошибки только в голове пишущего
Анастасия Щур Там еще условие по смыслу не совсем корректно - ибо 0 не является положительным числом.