Ответы на вопрос:
Program we var x,y,i,h,a,count: integer begin readln(x) readln (y) readln(h) i: =0 count: =0 repeat count: =count+1 i: =i+x-y until i> =h written ('за ',сount', дней улитка поднимется до конца ') end
Популярно: Информатика
-
Это Хемминг: 001010011010111 010000010111000 000001101100111 111101010001110...
finn1023.08.2021 00:47 -
Информационный объем текстового сообщения l- k- i-...
alina192212.12.2021 00:11 -
Как перевести количество информации из байтов в мегабайты...
ress33402.10.2022 03:06 -
Программу надо написать на c++ Программу надо написать на c++ Программу надо...
a27072005n18.01.2020 22:49 -
с информатикой 8 класс...
Miheevf03.03.2023 21:06 -
разшыфровать 1001010 1101111 1101000 1101110 100000 1000100 1101111 1100101 100000...
mastheadchan102.04.2023 19:39 -
1. Шо таке firewall? 2. Що таке антивірус? 3. Які типи антивірусів ви знаєте?...
vangok3127.04.2022 23:07 -
Даны переменные соответствуют десятичным числам, 19, 20, 21 Переведите числа...
dhgti24.01.2022 22:28 -
Приведите 2-3 примера московских компаний занимающихся разработкой праграммного...
Знания06113.06.2021 18:24 -
Ввести с клавиатуры символьную строку. Затем ввести номер символа, который нужно...
КристинаМельникова04.11.2020 14:15