Question

Паскаль.Ветвление.На экране высвечивается вопрос "Сколько в одном килобайте байт?" Если пользователь вводит правельный ответ,то на экране высчвечивается"правельно" ,если пользователь ошибается то выводится сообщение об ошибке.

Answer 1

A : integer;
begin
write("сколько кб...");
readln(a);
if a=1024 then writeln("Pravilno")
else writeln("nepravilno")
readln();
end.