нарисовать блок-схемы и написать программы

[lightblue]

1) вывести в одну строку 10 звездочек
2) вывести в столбик 10 звездочек
3) вывести 10 чисел от 1 до 10

[Вадим Мошев]

А сами что? Что не получается? Вы сами пробовали? Форум программистов и такие разделы не для того существуют, чтобы получать решения на халяву.

вывести 10 чисел от 1 до 10

А в строчку или в столбик?
++++++++++++++++++++++++

Начните делать сами, если что-то не будет получаться, спрашивайте, вам помогут, подскажут, но решать за вас не будут.

[lightblue]

Сообщение от Вадим Мошев

А сами что? Что не получается? Вы сами пробовали? Форум программистов и такие разделы не для того существуют, чтобы получать решения на халяву.


А в строчку или в столбик?
++++++++++++++++++++++++

Начните делать сами, если что-то не будет получаться, спрашивайте, вам помогут, подскажут, но решать за вас не будут.

Нам педагог ничего не объясняет. Непонятно , как это делать. Я написал первую, но не знаю правильно ли

[Аватар]

Я написал первую, но не знаю правильно ли

И как выводится?

[lightblue]

Program Star;
Var I,*:integer
Begin
Writeln ('*');
End;
Begin
For 1 to 10 do
Begin
WRITELN ('*');
End.

[lightblue]

Сообщение от Аватар

И как выводится?

Program Star;
Var I, * : integer
Begin
Writeln ( ' * ' );
End;
Begin
For 1 to 10 do
Begin
WRITELN ( ' * ' );
End.

[Аватар]

А компилировать пробовал?

[lightblue]

Сообщение от Аватар

И как выводится?

Ко второй задаче-
Program Star;
Var I, *:integer
Begin
Writeln ( ' * ' )
End;
Begin
For 1 to length 10 do
Begin
WRITELN ( ' * ' );
End.

[type_Oleg]

Program Star;
Var I,*:integer    // надо ставить ;  , и что такое * ? 
Begin
Writeln ('*');  // выведется одна звезда
End;           // зачем это. Убрать
Begin       // тоже убрать
For 1 to 10 do  // читайте, как правильно работать с for
Begin     // убрать
WRITELN ('*');     //  выведется 10 звезд в столбик, потому что ..LN 
End.

Осталось 1) и 3)

[lightblue]

Сообщение от Аватар

А компилировать пробовал?

Честно говоря, не на чем. И это домашнее задание по информатике. Как я уже сказал, нам ничего не объясняют, и я не понимаю. Хотел сравнить, как могло бы получиться, найти ошибки.