Составить программу в Паскаль: Может ли быть записан в секцию ученик, с ростом не менее 160 см; возраст не более 13 лет.

1

Ответы и объяснения

2013-03-19T11:05:04+00:00

program cvndio;

uses crt;

var rost,vozrast:integer;

begin

clrscr;

readln(rost.vozrast);

if (rost>=160) and (vozrast>=13) then writeln('+') else writeln('-');

readln;

end.