По представленной блок-схеме составьте программку.помогите составить либо исправьте мою

По представленной блок-схеме составьте программку.
помогите составить либо исправьте мою программку



program variant7_1;
var s,k,a,: integer;
begin
s:=0;
k:=0;
a:=100;
repeat
s:=s+a;
k:=k+1;
a:=a+10;
until agt;500;
sr:=s*k;
writeln ( ' вывод sr ' );
end.

Задать свой вопрос
Людмила Колготина
https://znanija.com/task/23365888
Андрей
Там только немножко поправить переменные
Jana Kramskova
sr = 504300 у меня таковой ответ выходит, я не должна ничего вводить?
Элина Теньковская
Так ведь нет же в блок-схеме блока ввода
Валерий Колябинский
Блин, спасибо огромное. Время от времени плохо доходит.
1 ответ
Var S,K,A:integer;
Begin
S:=0;
K:=0;
A:=100;
Repeat
S:=S+A;
K:=K+1;
A:=A+10;
Until Agt;500;
WriteLn('SR = ',K*S);
End.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт