Программа на Pascal - Помощь студентам

InFlesh · 15.04.2013, 08:10

Нужно написать программу которая приписывает в начало и конец 1

Stilet · 15.04.2013, 08:19

Код:

var начало,конец:integer;
begin
начало:=1;
конец:=1;
end.

InFlesh · 15.04.2013, 08:29

вы меня не поняли нужно к введенному числу в начало и конец прибавить единицу

Mad_Cat · 15.04.2013, 08:31

Код:

var i:real;
k:real;
begin
readln(i);
i:=i*10+1;
k:=1; while k<i do k:=k*10;
i:=k+i;
writeln(i);
end.

InFlesh · 15.04.2013, 08:33

Спасибо!Работает

15.04.2013, 08:10	#1
InFlesh Регистрация: 15.04.2013 Сообщений: 5	Программа на Pascal Нужно написать программу которая приписывает в начало и конец 1

15.04.2013, 08:19	#2
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Код: `var начало,конец:integer; begin начало:=1; конец:=1; end.` I'm learning to live...

15.04.2013, 08:31	#4
Mad_Cat Made In USSR! Старожил Регистрация: 01.09.2010 Сообщений: 3,657	Код: `var i:real; k:real; begin readln(i); i:=i10+1; k:=1; while k<i do k:=k10; i:=k+i; writeln(i); end.` "...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..." (c) Юрий Клинских aka "Хой"

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Программа на Pascal в Lazarus и программа для одномерного массива целых чисел	Yegorka	Lazarus, Free Pascal, CodeTyphon	13	20.12.2012 18:02
программа в pascal	DeeEmGY	Помощь студентам	1	13.03.2012 15:08
Программа на Pascal.	emersy	Помощь студентам	6	30.11.2010 01:12
[PASCAL]Программа создания файла, программа обработки файла	Виколяшка	Фриланс	7	23.09.2009 17:38
Программа создания файла, программа обработки файла [PASCAL]	Виколяшка	Помощь студентам	1	22.09.2009 22:56

15.04.2013, 08:29	#3
InFlesh Регистрация: 15.04.2013 Сообщений: 5	вы меня не поняли нужно к введенному числу в начало и конец прибавить единицу

15.04.2013, 08:33	#5
InFlesh Регистрация: 15.04.2013 Сообщений: 5	Спасибо!Работает