tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Паскаль. 1. вывести в столбик
Паскаль. 1. вывести в столбик все двузначные числа. (1 цикл, 1 переменная) 2. из тех же чисел вывести только те, что заканчиваются на 5. 3. вывести в ряд 15 рандомных чисел от 10 до 30.
poliska333
2 13.09.2019 21:30
0
Ответы
VitaVita2003
07.10.2020 12:43
1.
var i:integer;
begin
for i:=10 to 99 do writeln(i);
end.
Результат:
10
11
12
...
98
99
2.
var i:integer;
begin
for i:=10 to 99 do
if i mod 10=5 then writeln(i);
end.
Результат:
15
25
...
95
3.
var i:integer;
begin
for i:=1 to 15 do
write(random(21)+10,' ');
end.
Пример:
25 19 12 11 25 27 30 19 21 19 15 10 14 22 22
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
hfdgddcju
04.07.2019 09:20
Как называется пакет программ работой компьютера и обеспечивающий взаимодействие между человеком и компьютером...
siniTamy
04.07.2019 09:10
С++ с клавиатуры вводится целое число. если введенное число отрицательное, то возвести его в квадрат , оставить число без изменений в противном случае....
kisasay1123
04.07.2019 09:10
Что не может является источником проникновения вируса на компьютер а)модем в)электронная почта с)жёсткий диск d)съёмные носители...
mashuna1
04.07.2019 09:10
Известно, что в учебнике по информатике 200страниц,на каждой странице 90 строчек ,в каждой строчке 80 символов. сколько килобайт содержит книга, если считать , что 1кб=1000б?...
Vareniki0513
04.07.2019 09:10
Утараканов и пауков вместе 74 лапки. сколько могло быть тараканов и пауков, если у таракана - 6 лапок, а у паука – 8. паскаль...
fudhchf
04.07.2019 09:10
Крокодил гена и чебурашка играют в такую игру. чебурашка пишет слово на языке, потом гена заменяет в нем каждую букву на другую так, чтобы выполнялись такие правила:...
freddylolbrO
04.07.2019 07:26
Элементы массива а(5) равны соответственно 3, 7, 2, 1, -5. подсчитайте значение выражения a[7-a[3]]*a[5]+a[a[4]+a[1]]...
Каримончик
04.07.2019 07:27
.. какое значение примет переменная z после выполнения фрагмента алгоритма? x: =70; y=50; в случае x mod y выбрать -10..-1: z=x/y; 0..10: z=x+y; 11..100: z=x2; иначе...
Ульянатв
04.07.2019 09:00
Информация, обрабатываемая компьютером, кодируется: а) только с нулей и единиц б) с обычных цифр в) символов г) с цифр и символов д) с римских цифр...
elenagorodan
04.07.2019 09:00
Какие действие нужно выполнить чтобы создать папку? 1) открой содержимое папки в которой нужно создать новую 2)...
Популярные вопросы
Пополз -глагол или наречие или имя сущ-ное...
2
Гилросфера водная оболочка земли которая включает океаны...
2
По рассказу фазиля искандера тринадцатый подвиг геракла характеристика...
1
На покупку потратили 180р. эта сумма составила 9/10 всех имевшихся...
2
Решить рациональное неравенство (2x^2-7)^2-x(2x-19)-54 0...
2
Какой синоним в слове желтый поаоом...
1
При каком царе были изразцовые печи?...
2
Объясните как решить 2,77+7,2/9.пояснение...
1
Природу надо беречь ведь природа наш дом доказать и почему я так думаю...
1
Ыпростите выражение -7.6-x+5.9+8.1+x...
2
var i:integer;
begin
for i:=10 to 99 do writeln(i);
end.
Результат:
10
11
12
...
98
99
2.
var i:integer;
begin
for i:=10 to 99 do
if i mod 10=5 then writeln(i);
end.
Результат:
15
25
...
95
3.
var i:integer;
begin
for i:=1 to 15 do
write(random(21)+10,' ');
end.
Пример:
25 19 12 11 25 27 30 19 21 19 15 10 14 22 22