Есть ответ 👍

Решите ,используя while.как можно подробней. даны положительные числа a и b (a > b). на отрезке длины a раз- мещено максимально возможное количество отрезков длины b (без нало- жений). не используя операции умножения и деления, найти количество отрезков b, размещенных на отрезке a.

129
380
Посмотреть ответы 2

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


var a,b,k: integer; begink: =0; {обнуляем счетчик}

write('a='); read(a);   {вводим число а}write('b='); read(b);   {вводим число в}while a> b do  {пока а больше в выполняем действия}begina: =a-b;   {отрезку мы присваиваем значение, так скажем, отрезка}k: =k+1;   {счетчик увеличивается на единицу}end; writeln('k=',k);   {выводим количество раз}end.

кам81
4,7(96 оценок)

Program igra; var a,b,c: integer; beginwriteln('правда или действие? если выбираете правду, введите 1, если действие 2'); read(a); if a=1 then writeln('сколько тебе лет? ')else writeln('подтянись 5 раз'); writeln('правда или действие? если выбираете правду, введите 1, если действие 2'); read(a); if a=1 then writeln('сколько стоит твой компьютер? ')else writeln('пробеги вокруг техникума 5 раз'); writeln('правда или действие? если выбираете правду, введите 1, если действие 2'); read(a); if a=1 then writeln('какой человек самый неприятный для тебя? ')else writeln('не садись целый час'); end.

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