Предмет: Информатика,
автор: krnseluk
Знайти суму цілих чисел від 20 до 30 програмний код в лазарус
СРОЧНО ❗❗❗❗❗❗❗❗❗
Ответы
Автор ответа:
2
Ответ:
procedure TForm1.Button1Click(Sender: TObject);
var i,s:integer;
begin
S := 0;
for i := 20 to 30 do
S := S + i;
Label1.Caption := IntToStr(S);
end;
Приложения:


Похожие вопросы
Предмет: Русский язык,
автор: erimbetova72
Предмет: Русский язык,
автор: slyusarev78
Предмет: Русский язык,
автор: Аноним
Предмет: Русский язык,
автор: sokolka26
Предмет: Алгебра,
автор: Gggggggggggsjj