Создайте программу, которая загадывает пример на сложение - Pascal ABC
Формулировка задачи:
Создайте программу, которая загадывает пример на сложение двузначных чисел ( использую генератор случайных чисел), получает ответ и выдает оценку ответа (Верно!), если нет то (неверно! Верный ответ..)
Решение задачи: «Создайте программу, которая загадывает пример на сложение»
textual
Листинг программы
uses Crt;
var a,b,c,i,kol,osh:integer;
Begin
write('''введите количетво примеров''');
readln(kol);
repeat i:=i+1 ;
a:=random(256);
b:=random(256);
Write(a, '+', b,'=');
Readln(c);
if a+b<>c then Writeln('Не верно')
else writeln('Верно');
if a+b<>c then osh:=osh+1;
until i=kol;
Writeln(osh,'''ощибок''');
end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д