Нужна игра на паскале с выводом слова "Да" или "Нет" в отделном окне на любой вариант
Я ввожу слово, а в игре ( в программе) выводится "да" или "нет", как шар судьбы.
Заранее благодарен, завтра сдавать надо, а я весь год не учил ничего. :D
По дате
По рейтингу
write "Введите ваш вопрос шару судьбы:";
readln(txt);
if random(100)> 50 then writeln "Ответ положительный!"
else writeln "Ответ отрицательный!";
program ww;
uses crt;
var n: integer;
var s,s2, i: string;
begin
s := 'Да';
s2 := 'Нет';
n := random (1);
i:= readln()
if n=0 then
begin
writeln(s);
end;
if n=1 then
begin
writeln(s2);
end;
end.
ну что ж... мы в вас верим! Денег нет, но вы держитесь там.
нет
