Вход
Регистрация
Спроси здесь
Все
Биология
Информатика
Видео-ответы
Физика
Французский язык
Русский язык
Қазақ тiлi
История
Окружающий мир
География
Обществознание
Алгебра
Психология
МХК
Другие предметы
Английский язык
Українська література
Право
ОБЖ
Немецкий язык
Українська мова
Беларуская мова
Музыка
Химия
Экономика
Геометрия
Литература
Показать все предметы
Показать меньше предметов
Venidiktova
18.09.2019 05:20 •
Информатика
Первая : вывести на экран горизонтально числа от 1 до 10, 10 раз вторая : вывести на экран вертикально числа от 1 до 10,10 раз /паскаль/
Показать ответ
Ответ:
Axelion9000
21.08.2020 10:52
#1
program ez;
var i : integer;
begin
for i:=1 to 11 do
write('1 2 3 4 5 6 7 8 9 10');
end.
#2
program ez;
var i : integer;
begin
for i:=1 to 11 do
writeln('1 2 3 4 5 6 7 8 9 10 ');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Школьниқ
14.09.2019 05:40
Сколько целых положительных чисел удовлетворяет следующему условию (x 14) и ((x 8) или (x...
mikalis
14.09.2019 05:30
Запишите условие поиска файлов, в имени которых встречается «z»...
дияр22
14.09.2019 05:30
Вычислить f (x)=1/x, x не равно 0, при x= -10,- с использованием оператора for...
skillsass
14.09.2019 05:30
Лабораторная работа по информатике. v1 литров воды нагревается на электроплите от температуры t0 до температуры t1, а v2 литров- до температуры t2. сколько будет стоить затраченная...
xomahgf
14.09.2019 05:30
Запишите полный путь к файлу readme.txt, если известно, что он хранится в папке help, вложенной в паппку home, находяйщейся на диске d:...
Oktay4828422
14.09.2019 05:20
D: =c c: =b b: =a a=1 b=6 c=2 d=17 объясните что и как делается,если сможете,заранее ....
Наталинас
14.09.2019 05:20
Логическое выражение ¬ (¬a\/¬b)/\c равносильно …...
прииииииип
14.09.2019 05:20
Переведите двоичное число 11111 в десятичную систему счисления. заранее !...
SmatBok
14.09.2019 05:20
(а с чёрточкой на вверху ∧ в)∨(в∧с)...
Winstorm
14.09.2019 05:20
Лабораторная работа по информатике. в простую переменную последовательно вводятся 5 чисел. определить максимальное значение и количество чисел, равных максимуму. буду . +50 если...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
КОМПАНИЯ
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ и учителей
Сообщество родителей
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
Установи приложение
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь понять?
Спроси здесь
program ez;
var i : integer;
begin
for i:=1 to 11 do
write('1 2 3 4 5 6 7 8 9 10');
end.
#2
program ez;
var i : integer;
begin
for i:=1 to 11 do
writeln('1 2 3 4 5 6 7 8 9 10 ');
end.