Задание 13 Параграф 4.5 ГДЗ Босова 8 класс 2023 (Информатика)

Ниже вариант решения задания из учебника Босова, Босова 8 класс, Бином:

13. Запишите на языке Паскаль программы решения задач № 14-16 из § 3.6. Используйте оператор for.

№14

var

x, y, p, i: integer;

begin

write(taskx,y > > task);

readln(x, y);

p := 0;

for i := 1 to y do

p := p + x;

writeln(x, task * task, y, task =task, p)

end.

№15

var

i: integer;

n, d: real;

begin

n := 40000; d := 0.05;

for i := 1 to 3 do

n := n + n * d;

writeln(taskЧисленность населения через 3 года > task, n)

end

№16

var

n,i: integer;

begin

n := 1;

for i := 1 to 10 do

n := n*2;

writeln(taskКоличество бактерий через 10 минут > task, n)

end.