Паскаль.Ветвление.На экране высвечивается вопрос "Сколько в одном килобайте байт?" Если пользователь вводит правельный ответ,то на экране высчвечивается"правельно" ,если пользователь ошибается то выводится сообщение об ошибке.
A : integer; begin write("сколько кб..."); readln(a); if a=1024 then writeln("Pravilno") else writeln("nepravilno") readln(); end.