помогите пожайлуста написать программу на языке Pascal )))Очень безотлагательно

Помогите пожайлуста написать программку на языке Pascal )))Очень безотлагательно

Задать свой вопрос
1 ответ
Приблизительно так:
var A, B, V1, V2: integer;
begin
write('Введите возраст Пети: ');
read(A);
write('Введите возраст Димы: ');
read(B);
V1 := A/2 + 7;
V2 := B/2 + 7;
writeln('Возраст жены Пети: ', V1);
writeln('Возраст жены Димы: ', V2);
end.
Кирилл Транов
Сорре, не посчитала разницу) V = V1 - V2; writeln('Разница: ', V);
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт