Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
900901
18.07.2020 19:24 •
Информатика
Напишите любые 5 программ с циклом со счетчиком в pascalabc
Показать ответ
Ответ:
Gsjhcf
06.10.2020 11:49
var
A,B:byte;
begin
readln(A);
for B:=1 to 20 do
A:=A+1;
writeln(A);
end.
var
A,K,U:byte;
begin
readln(A,U);
while A>U do
begin
K:=K+1;
A:=A-1;
end;
end.
типа такого?
0,0
(0 оценок)
Популярные вопросы: Информатика
tamtamtamira
22.07.2022 07:14
Записать наибольшее двузначное число и определить его десятичный эквивалент для следующих систем счисления: а) восьмеричной; б) пятеричной; в)троичной; г) двоичной....
anastasiyageras
07.10.2022 02:48
Почему знания ком не хочет добавлять мое задание?...
Yulia221
19.08.2022 07:00
Табличний процесор -а) це прикладна програма, яка забезпечує автоматизацію створення, опрацювання, коригування, зберігання і друкування документів у формі таблиць;б) комп...
Anansiy
12.09.2022 06:18
Как заблокировать аккаунт в школьных знаниях или же в...
Здохненко0403
04.06.2022 06:15
Вывод на экран кубов чисел от 14 до 6...
popovapp26
29.09.2020 11:32
На рисунке даны координаты некоторых точек прямой. Которая из данных точек находится на этой прямой? M(15;13) K(15;17) Ни одна из данных D(15;30)...
Еее11111111
30.01.2022 06:27
Информатика 5класс. однажды в лагерь приехали пять девочек родом из мурманска ,самары, невиномысска, подольска, и твери.. юля, таня, аня, катя и вика . Мурманчанка сидела...
nurija090675
01.02.2021 08:30
Очень Напишите программу подсчета количества положительных, количества нулевых и количества отрицательных элементов массива. Проверьте работу программы на заданном массиве...
Neal12
07.05.2021 20:08
Информатика 5 класс на вход черного ящика подаётся информации, а на выходе черного ящика появляется информация. отгадайте правило по которому происходит преобразование...
Ira21Irina21
20.05.2023 20:29
Як зафіксувати номер стовпця у формулі?знак $ перед назвою стовпцязнак $ перед знаком =знак $ перед номером рядказнак $ перед назвою стовпця і номером рядка...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
A,B:byte;
begin
readln(A);
for B:=1 to 20 do
A:=A+1;
writeln(A);
end.
var
A,K,U:byte;
begin
readln(A,U);
while A>U do
begin
K:=K+1;
A:=A-1;
end;
end.
типа такого?