задачи на цикл while pascal

Можете подсказать как решить Даны положительные числа А,В,С. На прямоугольнике размера А*В размешено максимально возможное количество квадратов, размешенных на прямоугольнике. операции умножения и деления не использовать? помогите пожалуйста решить задачу…

Понравилась статья? Поделись в соц. сетях

Div целое кол-во делений на другое число. Например: 76 div 10 = 7

Mod это остаток от деления на какое либо число. Например: 76 mod 10 = 6.

Домашнее задание: Написать программу, которая находит наибольший общий делитель двух чисел.

Вот, что получится, если промежуток от 5 до 10.

Т.к. по условию задачи надо вывести квадраты ВСЕХ целых чисел мы пишемP writeln(kv); в теле цикла, если мы напишем его не в теле цикла, а после него, тогда паскаль выведет квадрат последнего числа из промежудка a..b, то есть квадрат числа b

end;PPPPPPPPPPPPPPPPPPPPPPP Конец тела цикла.

a:=a+1;PPPPPPPPPPPPPPPP Следующее число.

writeln(kv);PPPPPPPPPPP Паскаль выводит квадрат числа.

kv:=sqr(a);PPPPPPPPPP Sqr знак квадрата числа. Подробней знаки смотрите в

beginPPPPPPPPPPPPPPPPPPPPP Начало тела цикла(действий)

While a<=b do(перев.:до тех пор пока a меньше или равен b выполнять) Знак <= значит меньше или равно. Когда a>b тогда цикл перестанет работать.

a до b P- промежуток. X – число. Kv квадрат числа.

Пример задачи: Написать программу, которая выводит квадраты целых чисел на промежутке от A до B.

Запомни: Цикл while может быть вообще не выполнен. Если данные с первой попытки не удовлетворят условию, то он просто не начнет свою работу.

TRUE – Истина, FALSE – Ложь.

Условие – До тех пор пока дрова не кончатся. Действие - я буду рубить дрова.

Нам известен, какой результат должен получиться, а кол-во повторений не известно. Например: До тех пор пока дрова не кончатся, я буду рубить дрова.

Урок 8. Цикл While в Pascal | Dinaf.ru