Помогите пожалуйста! Очень безотлагательно!

Помогите пожалуйста! Очень безотлагательно!

Задать свой вопрос
1 ответ

1:

var i,k:integer;

BEGIN

k:=1;

for i:=1 to 5 do begin

for k:=1 to i do

write('*');

writeln();

end;

end.

2:

BEGIN

writeln('   *');

writeln('  ***');

writeln(' *****');

writeln('  ***');

writeln(' ******');

writeln('********');

writeln('  ***');;

end.

, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт