Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
ImHomme
17.06.2022 11:53 •
Информатика
Составить таблицу перевода метров в ярды если 1м=0,91 ярды на [1; 20] в паскале,ну программой записать
Показать ответ
Ответ:
milubel
17.07.2020 01:37
Var i:integer;
begin
write('|МЕТРЫ|');
for i:=1 to 20 do
write(i:6,'|');
writeln;
write('|ЯРДЫ |');
for i:=1 to 20 do
write(i*0.91:6,'|');
writeln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
AnastasiaPonomarenko
31.05.2020 15:19
Разгадай и запиши основные понятия темы сеть. в словах отображены только гласные буквы данных слов. _е__е_ _о_е_ __о_о_о_ __о_ай_е_...
temnikovay01
14.11.2022 15:03
составьте блок схему и программу для вычисления значения функции y в зависимости от заданного с клавиатуры значения аргумента ...
123451529
12.07.2020 13:42
Бесплатный хостинг подходит для личных веб-сайтов государственных учреждений больших компаний огромных общественных веб - сайтов...
Dinka1597
12.07.2020 13:42
. Дана программа: var s,t: integer; begin readln(s); readln(t); if (s 10) or (t 10) then writeln( ДА ) else writeln( НЕТ ) end. Было проведено 9 запусков этой программы,...
alina9ru
27.11.2022 12:12
Все любят путешествовать, и вы, возможно, тоже. Представьте такую ситуацию. Вы фотографируете и снимаете видеоролики на ваш смартфон. Но внезапно, ваше устройство вам...
lizkoy
13.10.2022 17:19
Ищу папика которые суинет мне денюжку ...
Pyben
09.05.2022 03:22
Https://vbuuh.com/watch/vaHQxTttxO5Rk49...
vladaandreeva2
06.04.2023 14:14
Установите эквивалентность высказываний XI=A*(A+B) X2 =A X3=B...
AMANBEKBERDIMURAT
28.09.2022 17:12
СОЧ по алгебре 8 класс 3 четверть 1 вариант...
Fagga322
08.02.2022 15:22
К. Покажи, что ты знаешь!Заполни логико-структурную схему:в течение третьей учебной четверти?С какими авторами ты познакомилсяНазвания изученных произведений:---Все эти...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('|МЕТРЫ|');
for i:=1 to 20 do
write(i:6,'|');
writeln;
write('|ЯРДЫ |');
for i:=1 to 20 do
write(i*0.91:6,'|');
writeln;
end.