Регистрация
Маришка1231
16.04.2022 11:33
Информатика
Есть ответ 👍

Напишите программу вася у папы силен в . но сейчас папа в командировке, а васе нужно найти все решения такого уравнения: x + y + x∙y = n поскольку вася за долгие годы безделья разучился решать без посторонней , вам предстоит по заданному целому n (0 ≤n≤ 109) найти количество таких пар целых неотрицательных чисел (x, y), чтобы выполнялось требуемое равенство. поспешите, не то все узнают страшную правду о васе.

286
391
Посмотреть ответы 2

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

Flas003
Flas003
4,7(41 оценок)
Var x,y,n,col: integer; begin col: =0; write('число - '); readln(n); for x: =0 to n do begin   for y: =0 to n do begin   if (x+y+x*y=n) then begin writeln(x,' ',y); col: =col+1; end;   end; end; write('количество - ',col); end.
Фрао
Фрао
4,7(17 оценок)

ответ:

автоматизация работы пользователя в среде microsoft

объяснение:

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