Хотя бы некоторые из них. Буду ооочень благодарен: 1. Написать на Паскале программу для вычисления суммы всех натуральных чисел в интервале от 100 до 200 2. Написать на Паскале программу для вычисления суммы: S=2+4+6+8+...+2*N,...
Хотя бы некоторые из них. Буду ооочень благодарен:
1. Написать на Паскале программу для вычисления суммы всех натуральных чисел в интервале от 100 до 200
2. Написать на Паскале программу для вычисления суммы: S=2+4+6+8+...+2*N, где N вводиться с клавиатуры
3. Что будет выведено на экран в результате след. программы, если N было присвоено значение 4.
Program prim;
Var N,S,i enteger;
Begin read(N); S:=0;
For i:=1 to N do
S:=S+2*I;
Write(S)
End
5. Какие из слов могут быть идентификаторами в Паскале (может быть неск. ответов): 123prim, БАК_12, slon_1, begin
6. Написать на Паскале программу для вычисления из трёх заданных целых чисел.
7. Что будет выведено на экран после выполнения след. программы:
Program my;
Var a,b,c:integer;
begin;
a:=5;
b:=a+10;
if a+b>20 then c:1 else
if b=15 then c:=2 else c:=3;
write(c)
end.
________________________________________________________
Мне хотя бы некоторые из вышеперечисленных. Буду очень признателен Вам. Заранее спасибо.
Гость
Ответ(ы) на вопрос:
Гость1)
sum = 0;
for i:= 100 to 200 do sum:=sum+i;
2)
readln (N);
sum:=0;
for i:=1 to N do sum:=sum+i*2;
3)
20
5)
slon_1
6)
вычисления чего?
7)
2
Не нашли ответ?
Похожие вопросы