Примерно так будет выглядеть блок-схема, результат работы программы и сама программа:
Program Age;
uses crt;
var A, M, P, Ma, Pa: integer;
begin
write('Введите Ваш возраст: ');
read(A);
write('Введите возраст мамы: ');
read(M);
write('Введите возраст папы: ');
read(P);
Pa := P - A;
Ma := M - A;
writeln('Возраст мамы, когда Вы родились: ', Ma);
writeln('Возраст папы, когда Вы родились: ', Pa);
end.
В паскале или где? А то сделаю не там где надо
Роман, козак,коза,Канада, мак,Рома,корова.
var
a, b, c: real;
begin
Write('Введите первую стороны => ');
readLn(a, b, c);
writeln('Периметр треугольника равен ', a + b + c);
end.
Персональный компьютер, текстовые процессоры, электронные таблицы