Составить программу для определения подходящего возраста кандидатуры для вступления в брак

@Кристюша5 · Регистрация: 22.04.2012

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

составить программу на языке паскаль для определения подходящего возраста кандидатуры для вступления в брак,используя следующее соображение: возраст девушки равен половине возраста мужчины плюс 7, возраст мужчины определяется соответственно как удвоенный возраст девушки минус 14.

Kodzaev · 24.04.2012, 20:09

Pascal

Uses crt;
Var
d,m,n: Integer;
BEGIN
Clrscr;
Writeln('Чтобы подобрать пару мужчине введите 1');
Writeln('Чтобы подобрать пару девушке введите 2');
Readln(n);
If n=1 Then
begin
  Writeln('Введите возраст мужчины: '); Readln(m);
  Writeln('Подходящий возраст девушки: ',m/2+7:0:0);
end;
If n=2 Then
begin
  Writeln('Введите возраст девушки: '); Readln(d);
  Writeln('Подходящий возраст мужчины: ',d*2-14);
end;
Readln
END.

@Кристюша5 0 / 0 / 0 Регистрация: 22.04.2012 Сообщений: 26
		1
	Составить программу для определения подходящего возраста кандидатуры для вступления в брак 24.04.2012, 18:51. Показов 26919. Ответов 1 Метки нет (Все метки) составить программу на языке паскаль для определения подходящего возраста кандидатуры для вступления в брак,используя следующее соображение: возраст девушки равен половине возраста мужчины плюс 7, возраст мужчины определяется соответственно как удвоенный возраст девушки минус 14. 0

	24.04.2012, 20:09

Опции темы

Составить программу для определения подходящего возраста кандидатуры для вступления в брак

Решение