Предмет:
ИнформатикаАвтор:
elliot513Автор:
kayarussoАвтор:
dwayneАвтор:
bram3tkcАвтор:
ralphppcyprogram HelloWorld;
var i,res,ok: integer;
var a,b: integer;
begin
ok:=0;
for i:=1 to 2 do
begin
a:=2+random(7);
b:=2+random(7);
write('Сколько будет ');write(a);write(' умножить на ');write(b);writeln(' ?');
readln(res);
if res = a*b then ok:=ok+1;
end;
write('Правильных ответов: ');writeln(ok);
end.
Автор:
alissonhickmanДобавить свой ответ
Предмет:
МатематикаАвтор:
sueОтветов:
Смотреть
Предмет:
Английский языкАвтор:
valenzuelaОтветов:
Смотреть