Написать программу на языке паскаль.
Циклический алгоритм с предусловием задан в виде словесного описания. Заданы начальные значения переменных:
x:=1; y:=5;
Начало цикла. Пока y>x выполнить:
y: = y – x;
k=k+1;
конец цикла;
Определить количество циклов k и значения переменной y после выхода из цикла.
Две переменные k и y, вывести на экран один раз
killpvpglava
2
30.03.2020 11:37
0
Другие вопросы по теме Информатика
cJKYSIRJH
12.12.2020 07:45
belbeksev
12.12.2020 07:45
Nurlan2010
08.09.2020 19:03
kolomietslina
08.09.2020 19:59
анна2255
23.04.2020 17:49
помогите5132
23.04.2020 17:49
romankrohov2005
17.05.2020 10:57
Популярные вопросы
- Норма как основа культуры речи - 1.1. Восстановите текст. Напишите слово,...
2 - Як організовували веєнний похід козаки? що ви дізналися про козацькі бойові...
2 - Paraphrase: About 59 million people live in Britain...
1 - девочки и мальчики водили хоровод вокруг елки. В хороводе было десять девочек....
1 - Спишите загадку. Отгадайте. Над овражком у дорожкиСтрашный стражник строит...
3 - Распишите структурные формулы...
1 - Основне джерело енергії для організму. Сприяють кращій роботі серця, мязів,мозку...
3 - Выполни возведение в степени (-5)²...
1 - 1.Функция одной независимой переменной и ее задания. Характеристики функции....
3 - Сколько колебаний произойдёт в колебательном контуре за 2 с., если ёмкость...
2
var
x, y, k: integer;
begin
x := 1;
y := 5;
k := 0;
while y > x do
begin
y := y - x;
k := k + 1;
end;
Writeln('Количество циклов: ', k);
Writeln('Значение переменной Y: ', y);
end.
Тестовое решение:
Количество циклов: 4
Значение переменной Y: 1