Предмет: Информатика,
автор: pretty20
помогите пожайлуста написать программу на языке Pascal )))Очень срочно
Приложения:
Ответы
Автор ответа:
0
Примерно так:
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.
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.
Автор ответа:
0
Сорре, не посчитала разницу) V = V1 - V2; writeln('Разница: ', V);
Похожие вопросы
Предмет: Биология,
автор: nadia24032009
Предмет: Қазақ тiлi,
автор: danildok2004
Предмет: Физика,
автор: yakubzhanovzhassur
Предмет: История,
автор: Рустэм11
Предмет: Химия,
автор: Temchik27