Форум » Олимпиадное программирование » Кружок по программированию 2009/2010 учебный год » Ответить

Кружок по программированию 2009/2010 учебный год

inf777: Оставляйте свои решения по задачам кружка в этом разделе. Напоминаю, что последняя задача которую необходимо было решить - это нахождение наибольшего целого числа из трех введенных с клавиатуры. Если есть вопросы, то выкладывайте текст программ в этом разделе. Не забывайте подписывать заголовок, можно в качестве заголовка сообщения вводить название программы.

Ответов - 4

BloodFly: Uses crt Var x,y,x2,y2:Integer; Begin read(x,y,x2,y2); If(x=x2)or(y=y2)then write('Yes'); Else Write('No'); End. Пишет: " Ошибка: ожидался символ точка с запятой."

inf777: В данном случае все очень просто. После того, как программа выдала сообщение об ошибке, посмотри где стоит курсор. Курсор ставиться в ту строку программы, где ошибка или в следующую строку после ошибки (например если в предыдущей строке не стоит точка с запятой). В данном случае, ты не поставил точку с запятой в первой строке после crt. Так же у тебя лишняя точка с запятой пред Else - здесь точка с запятой не ставиться, т.к. ветвление еще не закончилось.

inf777: Для тех, кто до сих пор не решил задачу о нахождении большего целого числа из трех введенных с клавиатуры, вот вариант решения: var x,y,z :integer; begin writeln('Введите три целых числа'); readln(x,y,z); if x < y then x:=y; if x < z then x := z; writeln('Наибольшее целое число = ',x); end.


inf777: Вычислите, в какой координатной четверти расположен треугольник, образованный прямой, заданной уравнением y=ax +b, и осями координат.



полная версия страницы