Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Mafiy12
20.09.2022 10:26 •
Информатика
Паскаль.решите с компьютера 1)вычислить 1^3++10^3 2)вывести "столбиком" значения √0,1,√0,√0,9
Показать ответ
Ответ:
Mykolaj8
08.10.2020 03:06
1)
var i,s:integer;
begin
s:=0;
for i:=1 to 10 do s:=s+i*i*i;
writeln('s = ',s);
end.
Результат:
s = 3025
2)
var i:integer;
begin
for i:=1 to 9 do writeln(sqrt(i/10):6:4);
end.
Результат:
0.3162
0.4472
0.5477
0.6325
0.7071
0.7746
0.8367
0.8944
0.9487
0,0
(0 оценок)
Популярные вопросы: Информатика
Irvina
14.03.2023 14:25
Менеджер составляет электронную табли Покупатели...
kolika2016
07.10.2020 05:37
Постройте таблицы истинности для логических выражений: А & B V - A & B ( A B ) & ( - A V B )...
panerik6
22.04.2023 22:43
Даны три целых числа. Выбрать из них те, которые принадлежат интервалу 1,3(Python)...
vladshmko
15.09.2020 15:05
У ученика 9б класса Ярослава есть массив с оценками четверть, всего 15 предметов. Вычислите количество 5 и 4.(массив заполняется случайными числами)(Pascal)...
2Сергей5751
14.11.2021 00:19
Вывести на экран свое имя......
ksushaybff
24.03.2020 15:15
Очень вычислите значения переменных A) x:=10; y:=2 + x mod 3; c:=15 mod 4 div y; x:=y+c; B) a :=15 b := a mod 3 div2 a :=a div b*2...
alyabevan02001
28.11.2021 20:13
Вставьте подходящие слова в пропуски () Множество различных моделей компьютеров, у которых обеспечивается программная и аппаратная совместимость, — это () (). Общие...
5nelli
29.06.2022 00:48
Составить задачу для подсчета суммы...
Ghhgfgh
26.06.2021 05:08
все данные представлены в цифровом виде как микропроцессор определяет что данные являются командой а не числом которое необходимо обработать...
CNikolas2001
17.09.2021 11:52
(b неизвестно натуральное число b≥2) выполняя первую из них Альфа увеличивает число на экране на 1) +12) умножает это число на b. известно что программа 11211 переводит...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var i,s:integer;
begin
s:=0;
for i:=1 to 10 do s:=s+i*i*i;
writeln('s = ',s);
end.
Результат:
s = 3025
2)
var i:integer;
begin
for i:=1 to 9 do writeln(sqrt(i/10):6:4);
end.
Результат:
0.3162
0.4472
0.5477
0.6325
0.7071
0.7746
0.8367
0.8944
0.9487