Question

Что не так в коде (pascal abc) type human=class public name: string; age: integer; height: integer; end; var h: human; begin h: =new human; writeln('! я хочу немного узнать о тебе. '); write('как тебя зовут: '); readln(h.name); write('прекрасно, ',h.name, ',а теперь скажи скоко тебе лет? : '); readln(h.age); if (h.age> 17) then writeln('здорово ты уже совершенно летний! '); else writeln('о ты мальчик! '); write('а скажи ка какой у тебя рост: '); readln(h.height); writeln(); writeln('ну вот и все. мы собрали '); writeln('тебя зову ','h.name); writeln('тебе ','age.); writeln('твой рост: ','h.height,'см'); writeln(); writeln(', 'h.name,'.до новых встреч! '); end.

Answer 1

Много чего. переменные в writeln пишут writeln('трололо',h.myvar,'лоло'), в if работает схема if условие then правило1 else правило2;

Answer 2

Перед   else  убрать ;
' h.name   - убрать '
' age.  заменить  на h.age
' h.height,  - убрать '
' h.name  - убрать '
заменить на