Форумы Компьютеры Программирование Turbo Pascal
Kg_kg(Off)
(05.02.13 12:45)
Я учусь 9 классе скоро закончу и сразу В Политех пойду если че учиться. А паскалем знаком давно и программирую на нем. Хожу на олимпиады по языку Паскаль!
Kg_kg(Off)
(05.02.13 12:48)
1-программа: Вы вводите слово или несколько слов предложения без разницы
Это программа считает буквы+пробелы

Program p1;
uses crt;
var sim:string;
i:integer;
begin
clrscr;Textcolor(10);
writeln('Vyvedite simvoly stroki:');
while not Eoln do
begin
i:=i+1;
read(sim[i]);
end;
writeln('kolichestvo simvolov v stroke v Familii=',i:4);
readln;
end.
Kg_kg(Off)
(05.02.13 12:54)
2 программа:
Вы смотрели фильм Матрица. Думаю многие да.
Так вот том фильме на мониторе шли цивры не понятные. Это программа похожа но идет слева на право а не с верху вниз:

PROGRAM MATRIX;
USES CRT;
VAR X,Y,Z:REAL;
BEGIN
CLRSCR;TEXTCOLOR(LIGHTGREEN);
Y:=1;
Z:=X;
WHILE Z

Последний раз редактировалось Kg_kg; 05.02.13 в 12:58.
Kg_kg(Off)
(05.02.13 12:58)
< 2000 DO
BEGIN
Y:=Y+2;
X:=SQR(Y);
X:=1/X;
Z:=Z+X;
WRITE(Z);END;
READLN;END.
Smurfilo(Off)
(13.05.13 23:44)
Вспомнил как в школе обманывал учительницу с паскаля) Она задавала задачу, а я в конце урока просто делал примитивную программу на 1 действие (врителн) и выводил ответ задачи, заранее подсчитав его на листочке.)
sanila1000(Off)
(21.06.13 13:58)
дайте ссылку на учебник .
AshleyR(Off)
(25.06.13 22:52)
Хай пиплы. Где ссылочка?
Kazname(Off)
(04.09.13 10:39)
USB pascal кто узнайт как роботает
.DoWnloAd13(Off)
(01.10.13 01:00)
Да одни нубарИ!
Yamur(Off)
(14.05.14 13:54)
Помню даже в школе при помощи Турбо Паскал 2.1 писали вирусы. Написал, запустил и все- слетели биос!
Страница:
«Пред.| След.»
123 ... , 101112
Стр.

Меню Главная
7ba.Ru
MobTop - top mobile rating
[Сжатие: 39%]
[0.0397]