Знайти суму цілих чисел від 20 до 30 програмний код в лазарус
❗❗❗❗❗❗❗❗❗
ATAT1
1
07.04.2021 12:16
0
Другие вопросы по теме Информатика
kostya79bat1
18.08.2019 02:30
gordeevlogain2
26.08.2019 19:30
mariyayakovleva1
19.09.2019 10:50
TkAl06
21.12.2020 14:00
iakatya
21.12.2020 14:00
zajnabh35
21.12.2020 14:00
rootiopa2
21.12.2020 14:00
137rdh
09.09.2020 02:46
iraermila
09.09.2020 01:56
Популярные вопросы
- Какие вы транспортные технологии знаете...
3 - Нужна дано: треугольник abc ; a (3; -6) , b (5; 16) , c (12; 2) найти : cos a,...
1 - 3sin^2(2x)-sin2x*cos2x- 4cos^2(2x)=0 )...
1 - Вчом суть произведения смерть поэта...
2 - Составить словосочетание со словом седины...
1 - Составить свой диктант из 10 слов с праверочним словом....
2 - 12 запитань по темі сонячна система...
3 - Класифікуйте хімічні елементи, символи яких c,ai,n,ci,ag,pt, на металічні та...
1 - Придумать слоган к названию магазина хозмаг#1...
2 - Предмет знаходиться на 20 см від збиральної лінзи з оптичною силою 15 дптр. на...
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;