Дарья
Дарья

помогите пожалуйста!..

Составьте программу для вычисления S.
Найти значение выражения S=(a+b)/2*n, для номеров n:=5 до k, с шагом 0,8.
Значения переменных а, b, k ввести с клавиатуры.

паскаль

ВГ
Владимир Гогонов

var
a, b, k, n, s: real;
begin
write('a b k? ');
readln(a, b, k);
n := 5;
while n <= k do
begin
s := (a + b) / 2 * n;
writeln('n: ', n:0:1, '; s: ', s:0:2);
n := n + 0.8;
end;
end.

Виктория Назарова
Виктория Назарова

какой язык програмирования ?

Похожие вопросы
Помогите пожалуйста! =(
помогите пожалуйста в с++
Помогите пожалуйста!! ! =))
С++ Помогите пожалуйста
Помогите пожалуйста С++
С++ Помогите пожалуйста.
Помогите пожалуйста!! ! С++
Помогите, пожалуйста, еще!!! С++
Помогите, пожалуйста!!! С++
помогите пожалуйста помогите!!!!