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