Организация ветвления

toxa777 · 16.02.2012, 20:16

Как в эту программу добавить цикл,определения возраста?

var s:string;
begin
writeln('Enter your gender (М or Ж)');
readln(s);
if (s='М') or (s='М') then writeln('военнообязанный');
if (s='Ж') or (s='Ж') then writeln('невоеннообязанная');
readln
end.

Вот задание-Напишите программу, которая по возрасту и полу человека, определяет является ли он военнообязанным (мужчина – военнообязанный; женщина - невоеннообязанная).

Vladimir_S · 16.02.2012, 20:35

Цитата:

Сообщение от toxa777

Как в эту программу добавить цикл,определения возраста?

А вот так:

Код:

var
 G:Char;
 Age:Byte;
begin
 write('Enter your gender (M or W) ');
 readln(G);
 write('Enter your age ');
 readln(Age);
 if ((G='M') or (G='m')) and (Age>17) and (Age<46) then
  writeln('Liable for call-up')
 else
  writeln('Not liable for call-up');
 readln
end.

16.02.2012, 20:16	#1 (permalink)
toxa777 Banned Регистрация: 16.11.2011 Сообщений: 16 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Организация ветвления Как в эту программу добавить цикл,определения возраста? var s:string; begin writeln('Enter your gender (М or Ж)'); readln(s); if (s='М') or (s='М') then writeln('военнообязанный'); if (s='Ж') or (s='Ж') then writeln('невоеннообязанная'); readln end. Вот задание-Напишите программу, которая по возрасту и полу человека, определяет является ли он военнообязанным (мужчина – военнообязанный; женщина - невоеннообязанная).

16.02.2012, 20:16
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Список тем, которые схожи с вашей Организация ветвления. Помогите С# Организация циклов Организация охлаждения для Wi-Fi роутера

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070