Васин младший брат Дима проходит деление и умножение. Он быстро сделал домашнюю работу, заскучал и пришёл к Васе, когда тот играл на компьютере. Чтобы Дима не мешал играть, Вася придумал для него хитрую задачу. Он написал три числа и велел Диме посчитать произведение второго и третьего, если первое делится и на второе, и на третье.
Выведи произведение второго и третьего числа, если первое делится и на второе, и на третье. Если не делится, не выводи ничего.
Ввод Вывод
12
2
4 8
14
7
4
begin
writeln('Сколько примеров будешь решать:');
readln(n);
for i:=1 to n do
begin
a:=random(10)+1;
b:=random(10)+1;
write('Сколько будет ',a,'+',b,'=');
readln(x);
if x=a+b then
begin
p:=p+1;
writeln('Правильно');
end
else writeln('Неверно');
end;
writeln('Число правильных ответов: ',p);
if p=n then writeln('Отлично, ты превосходно знаешь арифметику');
if (p<n) and (p/n>0.75) then writeln('Хорошо, ты неплохо знаешь арифметику');
if (p/n<=0.75) and (p/n>0.5) then writeln('Удовлетворительно, ты средне знаешь арифметику');
if (p/n<=0.5) and (p>0) then writeln('Плохо, ты не знаешь арифметику');
if p=0 then writeln('Отвратительно, ты абслютно не знаешь арифметику');
end.
Можно сделать, чтобы не только на сложение, а на все 4 действия.