tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Уменьшение положительного числа
Уменьшение положительного числа до тех пор, пока оно неотрицательное. как только число становится отрицательным, команда повторения заканчивает свою работу программу в pascal abc
KasiaW
3 01.07.2019 09:10
0
Ответы
gimnastikgirla
02.10.2020 17:16
Странная задача, однако..но:
program z1;
var k:integer;
begin
writeln('Введите число');
readln(k);
while(k>0) do
k:=k-1;
writeln(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
arihadid
30.05.2019 17:20
объяснить решения такого типа: 1)напечатать числа в виде следующей таблицы: 1) 5 5 5 5 5 2) 1 1 1 1 1 5 5 5 5 5 1 1 1 1 5 5 5 5 5 1 1 1 5 5 5 5 5 1 1 1 язык программирования...
kazbek6
03.05.2021 07:58
С какой целью в текстовые документы включают списки, таблицы, графические изображения? * Для того, чтобы использовать все возможности текстового процессора.Для того,...
inesssa444
13.08.2019 10:30
A= 7 b= a*2 b= b mod 3+b a= b mod a+3 чему равен а? a: =5; b: =a*3 b: =b div 7+a a: =2*(b div a) чему равен а?...
Няша177777777777
13.08.2019 10:30
Информационое сообщение обьемом 900 бит состоит из 180 символов какова мощьность алфавита с которого записано даное сообщение...
evaklchn
23.05.2019 14:20
1) составить алгоритм, который определяет могут ли 3 заданных числа быть сторонами треугольника. 2)составить алгоритм который вычисляет корни квадратного уравнения...
Кристина6701001
23.05.2019 14:20
Заполнить массив из 10 элементов. во второй массив переписать все элементы кратные 5 на четные числа...
хорош16
23.05.2019 14:20
1000110101 в десетисную перевести информвтика...
lalalypsik
10.09.2020 01:22
Можете пожайлуста твір про конотоп...
nano82
10.09.2020 01:21
Сделать програму по задаче и обяснить ее работу пошагово задача: Получить список учеников которые учатся играть на скрипке. указать также сколько лет они занимаются...
horizontal
22.12.2020 13:58
Церковний гімн від якого був створений джаз?...
Популярные вопросы
Назовите 3 функции политики в государстве...
2
Cl2 + h2o = ? что получается: hclo + hcl или hclo3 + hcl? почему?...
3
Вправильной треугольной пирамиде сторона основания равна а, а боковые...
2
Запишите взаимодействие бутилового спирта с кислотами?...
2
Почему запах разогретого асфальта слышится из...
3
На автозаправочную станцию утром 1680 л.бензина в 3 одинаковых по...
3
На уроке физкультуры нужно было прыгнутьв длину с места на 90 см....
2
Придумать 4 -5 предложений с обрашениями - надо : ) : * =...
1
Тело,имеющее начальную скорость 10 см/с,получает ускорение 0,05...
2
Найдите значение выражения √x+y^2 при x=15 и y=-7...
3
program z1;
var k:integer;
begin
writeln('Введите число');
readln(k);
while(k>0) do
k:=k-1;
writeln(k);
end.