
Loshutmyu
7 год назад
Напишите программу (игру) на языке Паскаля, которая создает число от 1 до 10 и его нужно угадать (вписать). При угадывании числа программа пишет "Вы угадали", если не угадали, то "Вы не угадали"

ОТВЕТЫ

Osip
Jul 14, 2019
Перенос строки на сайте автоматически удаляется при копировании кода из IDE. Ниже прилагается скрин, как должен выглядеть код
program zn; begin; var a, b: integer; a:=random(10); repeat writeln(Введите число); readln(b); if a=b then writeln(Вы угадали) else writeln(Вы не угадали); until a=b; end.
program zn; begin; var a, b: integer; a:=random(10); repeat writeln(Введите число); readln(b); if a=b then writeln(Вы угадали) else writeln(Вы не угадали); until a=b; end.
148