Turbo Pascal

[Wihar]

Народ, помогите!
Тема: Программирование линейных алгоритмов в среде программирования Turbo Pacsal.
Задание - Цены на 2 вида товаров выросли на p процентов. Вывести старые и новые цены.
P.S. В принципе мне ничего и не дано, а нужно написать программу и составить блок-схему.
Тема: Программирование разветвлённых алгоритмов в среде программирования Turbo Pascal.
Задание - Ввести номер месяца. Вывести названия времени года.
P.S. Здесь тоже самое - составить программу и блок-схему.

[R_G]

icq 362306570. пиши помогу.

[Stilet]

Цены на 2 вида товаров выросли на p процентов. Вывести старые и новые цены.

Если не ошибаюсь и с учетом что

мне ничего и не дано

 var cena,proc:double;
begin
 cena:=12.36;
 proc:=5;
 write(cena:5:2,' Nova cena = ',cena+(cena/(100+proc)):5:2);
 readln;
  { TODO -oUser -cConsole Main : Insert code here }
end.