Предмет: Информатика, автор: KsyushaKot

ПРОГРАММИРОВАНИЕ, ПАСКАЛЬ. 
Помогите, пожалуйста, не могу понять в чём ошибка, пишет,что 2:1, тоесть из-за ; после название программы, но ведь так и должно быть или я ошибаюсь?

Program month;
var a: Integer;
Begin
Writeln('Введите число от 1 до 3');
Readln(a);
If a:= 1 then writeln('Январь')
if a:= 2 then writeln('Февраль')
if a:= 3 then writeln('Март')
Readln;
end.

Ответы

Автор ответа: s3rgey
0
смотри в 6,7,8 строке после a убери : и все работать будет ))

s3rgey: и 9 строка Readln; там не нужен
KsyushaKot: Исправила уже, но от этого основная проблема не решилась. И про 9 строчку, нас так учат,что б экран задерживался в итоге,если не будет - не зачтут.
s3rgey: а и еще у тебя нету ; после 6,7,8 строчки )))
KsyushaKot: Да я
KsyushaKot: Это тоже сделано уже
KsyushaKot: В общем мне уже помогли,и проблема в самом паскале, в любом случае, спасибо)
Автор ответа: petyaGavrikov
0
Program month;
var a: Integer;
Begin
Writeln('Введите число от 1 до 3');
Readln(a);
If a=1 then writeln('Январь');
if a=2 then writeln('Февраль');
if a=3 then writeln('Март');
Readln;
end.

Пример:
Введите число от 1 до 3
2
Февраль
Похожие вопросы
Предмет: История, автор: ГрафМонте
Предмет: География, автор: allax9898