uses crt; var c:char; begin clrscr; write('Введите символ '); readln(c); case c of '0'..'9':write('Это десятичная цифра, ее код ',ord(c)); 'A'..'Z':write('Это прописная латинская буква, ее код ',ord(c)); 'a'..'z':write('Это строчная латинская буква, ее код ',ord(c)); '+','-','*':write('Это знак арифметического действия, его код ',ord(c)); //убрал знак /, он в спец. символах ';','<','=','>','?','[',']','{','}','\','/':write('Это служебный символ, его код ',ord(c)); else write('Символ не входит в указанный список') end; readln end.
№1 1) Названием программы не может быть оператор end 2) Ошибок нет 3) Неверно написан оператор (нужно programm, вместо programma) №2 1) Неправильно записан оператор mod. Неправильно написан знак присваивания (:=) 2) Неправильно записан оператор div. Неправильно написан знак присваивания (:=) 3) Недостаточно аргументов. Неправильно написан знак присваивания (:=) 4) Неправильно записан оператор div. Неправильно написан знак присваивания (:=). Лишний символ ^ №3 1) 1 2) Ошибка 3) 4 4) 5 5) 64 6) 10 7) 81 №4 Вообще, здесь должна быть ошибка, потому что неверно записан знак присваивания Если представить, что там все правильно, тогда: b=4680 a=4682
1)1969 жылы 29 қазан Ғаламтор туылған күн деп есептеледі.
2)Модем - бұл құрылғы қабылдау және жіберу телефон жүйесі арқылы ақпарат
Объяснение:
Кешір калганын білмеймін