var a,b,sum:integer;
begin
randomize;
a:=random(10);
b:=random(10);
write(a,"*",b,"=");
read(sum);
if sum=(a*b) then write("Pravilno!") else write("Neverno");
readln
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var a,b,sum:integer;
begin
randomize;
a:=random(10);
b:=random(10);
write(a,"*",b,"=");
read(sum);
if sum=(a*b) then write("Pravilno!") else write("Neverno");
readln
end.