Информатика, опубликовано 29.10.2021 19:06
Вкажіть правильний варіант використання умовного оператора: *
1 IF <умова> THEN <серія операторів 1>; ELSE <серія операторів 2>;
2 THEN <серія операторів 1> ELSE <серія операторів 2> IF <умова>;
3 THEN begin <серія операторів 1> end IF <умова> ELSE begin <серія операторів 2> end;
4 IF <умова> THEN begin <серія операторів 1> end ELSE begin <серія операторів 2> end;
Ответ оставил: Гость
Procedure TForm1.Button1Click(Sender: TObject);
var i,kol,sum:integer; aver:real;
begin
sum:=0;
kol:=0;
for i:=10 to 99 do
if i mod 13=0
then
begin
sum:=sum+i;
kol:=kol+1;
end;
aver:=sum/kol;
Label4.Caption:=IntToStr(kol);
Label5.Caption:=IntToStr(sum);
Label6.Caption:=FloatToStr(aver);
end;
Оформление:
var i,kol,sum:integer; aver:real;
begin
sum:=0;
kol:=0;
for i:=10 to 99 do
if i mod 13=0
then
begin
sum:=sum+i;
kol:=kol+1;
end;
aver:=sum/kol;
Label4.Caption:=IntToStr(kol);
Label5.Caption:=IntToStr(sum);
Label6.Caption:=FloatToStr(aver);
end;
Оформление:
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01