Регистрация
polinaaaaaaaaaiiii
15.01.2023 13:02
Информатика
Есть ответ 👍

По фасту у меня сор 2 вопроса ​

109
385
Посмотреть ответы 1

Ответы на вопрос:

kuchin119
kuchin119
4,8(60 оценок)
Вот. умножение без операции умножения. делай лучшим) program pr; var i,a,b: integer; p: real; begin write('первый множитель: '); readln(a); write('второй множитель: '); readln(b); if b< 0 then begin b: =-b; for i: =1 to b do begin p: =p+a; end; writeln(-p: 0: 2); end else begin for i: =1 to b do p: =p+a; writeln(p: 0: 2) end; end.

Популярно: Информатика