Составить программу в Паскаль: Может ли быть записан в секцию ученик, с ростом не менее 160 см; возраст не более 13 лет.
5-9 класс
|
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.
Другие вопросы из категории
var a, b:integer;
begin
readln (a);
if 99 < a < then
writeln('Неверно')
else
if a>999 then
writeln('Неверно')
else
writen('Верно')
end.
Выдаёт: pas(5) : Ожидался идентификатор
Что не так?
Читайте также
и составляют b руб(в месяц).Рост цен ежемесячно увеличивает расходы на 3%,составьте программу расчета необходимой суммы денег,которую нужно единовременно попросить у родителей,чтобы можно было прожить 10 месяцев,используя эти деньги.
Агент 007 узнал, что в секретном сейфе трёхзначный код, в котором все три цифры разные.При этом средняя цифра равна разности крайних цифр. Составить программу, которая напечатает для него все такие числа.
Клоун
предложил каждому из публики задумать число. Потом он сказал: «Прибавьте к
задуманному числу 5. Теперь из результата вычтите 2. А теперь к результату
прибавьте 7». Потом клоун спросил у желающих, какое число у каждого из них
получилось. Услышав ответ, он немедленно объявлял каждому, какое число тот
задумывал. Составьте программу, которая повторяла бы фокус клоуна.
рут тех, чей рост не менее 180 см. Опишите на русском языке или на одном из языков программирования алгоритм, который подсчитывает и выводит минимальный рост игрока баскетбольной команды. Гарантируется, что хотя бы один ученик играет в баскетбольной команде.Нужно паскаль