Var a,b,c,d:integer; begin writeln('Введите первое число'); readln(a); writeln('Введите второе число'); readln(b); c:= a * b; d:= a / b; writeln('Произведение чисел = ',c); writeln('Частное чисел = ',d); end. Я оч давно не писал на Pascal так что особо не уверен в том что написал,но проверь :D
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
