Выполните задания по теме «Программирование циклов ** паскале»: 1.Определите, что...

+130 голосов
6.0m просмотров

Выполните задания по теме «Программирование циклов на паскале»: 1.Определите, что будет напечатано в результате следующего алгоритма.Var s,k:integer;begins:=0;For k:=1 to 12 do s:=s+5;writeln(s);end.2.Написать программу для вывода на экран кубов чисел от A до B, которые вводит пользователь.3.Написать программу:Найти сумму n элементов следующего ряда чисел:1, -0.5, 0.25, -0.125…… Количество элементов (n) вводится с клавиатуры4.Дано вещественное число — цена 1 кг конфет. Вывести стоимость 0.1, 0.2, …, 1 кг конфет.Написать программу для решения этой задачи5. написать программу вывода на экран натуральных чисел от 1 до 9​


Информатика (95 баллов) | 6.0m просмотров
Дан 1 ответ
+35 голосов

1)60

2)var a,b: integer;

begin

 readln(a,b);

 while a<=b do begin writeln(a*a*a); a:=a+1; end;</strong>

end.

3) var a,s,n,d:real;

b:=-0.5;

begin readln(n);

a:=1;

s:=1;

d:=1;

while a

writeln(s)

end.

4) var a,s: real;

begin

 writeln('введите стоимость килограмма');

 readln(s);

 a := 0.1;

while a

begin

writeln(a*s);

a:=a+0.1;end

end.

5)var a: integer;

begin

 a:=1;

 while a<=9 do begin writeln(a); a:=a+1; end;</p>

end.

(190 баллов)