найти ошибки. помогите. сейчас надо(

@MiBr · Регистрация: 08.06.2011

Author24 — интернет-сервис помощи студентам

задание по лабораторной, если можете сейчас ответить( !задание 16.7!

@sergof · 09.06.2011, 19:15

Все отлично! только потрудитесь выложить текст! ну или хотябы проверить этот:
var a,b:integer;
begin
if a=nil then read(a); a:=5;
b:=nil; b:=2;
new(b);read(b);writeln(b,b);
new(a); b:=a; dispose(a); B:=4;
end.

имеется ввиду и точки и запятые тоже!

@MiBr 1 / 1 / 4 Регистрация: 08.06.2011 Сообщений: 25
		1
	найти ошибки. помогите. сейчас надо( 09.06.2011, 06:23. Показов 462. Ответов 1 Метки нет (Все метки) задание по лабораторной, если можете сейчас ответить( !задание 16.7! Миниатюры 0

@sergof 1 / 1 / 3 Регистрация: 26.01.2011 Сообщений: 74
	09.06.2011, 19:15	2
	Все отлично! только потрудитесь выложить текст! ну или хотябы проверить этот: var a,b:integer; begin if a=nil then read(a); a:=5; b:=nil; b:=2; new(b);read(b);writeln(b,b); new(a); b:=a; dispose(a); B:=4; end. имеется ввиду и точки и запятые тоже! 0