составить программу вычисления значения суммы чисел: 14;15;16;17;.... пока сумма не достигнет числа k помогите без вас некуда
Ответы на вопрос
Ответил jaaagga
0
Исправил на верное прошу прощение за ошибку не понял ваш вопрос просто.
Вводим число 17 для i и программа начинает работать вот так 14+15+16+17=62
Вот правильная программа:
Program сhet2;
uses crt;
var x,y,i:integer;
begin
textcolor(11);
writeln('Введите i: '); //В твоем случае это 17
readln(i);
y:=0;
for x:=14 to i do begin
y:=y+x;
end;
writeln (y);
readln();
end.
Вводим число 17 для i и программа начинает работать вот так 14+15+16+17=62
Вот правильная программа:
Program сhet2;
uses crt;
var x,y,i:integer;
begin
textcolor(11);
writeln('Введите i: '); //В твоем случае это 17
readln(i);
y:=0;
for x:=14 to i do begin
y:=y+x;
end;
writeln (y);
readln();
end.
Ответил jaaagga
0
Прежде чем что то удалять прочтите внимательно что написано.
Ответил contrlc
0
Это должно быть в условии, а не в комментариях
Ответил contrlc
0
И почему же автор отметил нарушение в вашем ответе?)))
Ответил jaaagga
0
Хмм и вправду не заметил. Значит я не так понял вопрос.
Ответил jaaagga
0
Исправил!
Новые вопросы