Код:
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
randomize;
i:=random(2);
case i of
1:(label1.Caption:='что такое солнце?') and
(RadioButton1.Caption:='aftafa') and
(RadioButton2.Caption:='aftafa') and
(RadioButton3.Caption:='aftafa') and
(RadioButton4.Caption:='aftafa');
2: Label1.Caption:='f';
end;
end;
А как правильно написать это?