Есть ответ 👍

Составьте программу на вычисление частного числа, цикл с предусловием

117
236
Посмотреть ответы 2

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


Var a,b,c: integer; begin writeln('введите число'); readln(a); b: =2; while (a mod b < > 0) do begin   b: =b+1; end; writeln(b); end.

Program xz; var y,x,b: real; begin   witeln('введите два  числа');     readln(x,y);     y: =x/b;     writeln('ответ  ',y); end.

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