? Ойлануға берілген сұрақтар 1. Қалай ойлайсың, программалауды үйрену не үшін қажет? 2. Программа құрудың - id1623961020201224 от Xmitejr 24.12.2020 02:23

Question

Информатика: ? Ойлануға берілген сұрақтар 1. Қалай ойлайсың, программалауды үйрену не үшін қажет? 2. Программа құрудың интеграцияланған ортасы (IDE) бойынша түсінігіңді сыныптастарына қысқаша қалай жеткізер едің? 3. Программа құрудың интеграцияланған ортасы қандай бөліктер- ден тұрады? 4. Программалау тілдерінің арасынан не себепті Python-ды тандадың? көмектесіңдерші берем 14.01.21. сағат 17:00​

Xmitejr · Accepted Answer

1)
var a,b,s:integer;
begin
Readln(a,b);
s:=0;
if (a<0)and(b<0) then
begin a:=-a; b:=-b; end;
if a<0 then for var i:=1 to b do s+=a
else for var i:=1 to a do s+=b;
WriteLn(s);
end.

Пример:
-7 15
-105

2)
var n,s:integer;
begin
Readln(n);
s:=0;
for var i:=1 to n do s+=i;
WriteLn(s);
end.

Пример:
100
5050

3)
var a,b,s:integer;
begin
Readln(a,b);
s:=0;
for var i:=a to b do s:=s+i*i;
writeLn(s);
end.

Пример:
2 5
54

4)
var a,b,n:integer;
begin
Readln(a,b,n);
for var i:=1 to n do write(random(b-a+1)+a,' ');
end.

Пример:
10 20 5
11 12 14 14 18

MOGZ ответил