Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
kulakov2003
31.05.2021 15:13 •
Информатика
написать программу Паскаль Задана арифметическая прогрессия 2; 2.8 ... . сколько членов прогрессии нужно сложить чтобы полученная сумма стала больше 20
Показать ответ
Ответ:
nadezhdalipchan
11.01.2021 12:06
var x,s,k:real;
begin
x:=2;
While s<=20 do
begin
s:=s+x;
k:=k+1;
x:=x+0.8;
end;
write(k);
end.
Объяснение:
0,0
(0 оценок)
Популярные вопросы: Информатика
Iaro
26.03.2022 20:14
Вычисли x=31+425+7 . Запиши программу для вычисления x в Паскале и выведи на экран. var x:real; begin x:=(31+42)/(5+7); end. var x:real; begin x:=(31+42)*(5+7); writeln( x=...
прапрр
16.05.2022 19:26
Что является главной характеристикой быстрой работы мобильного устройства?...
НаТаШаЯЯЯ
30.07.2022 21:26
25 1)дана последовательность 5, 9. 13, составить блок-схему алгоритма для определения числа слагаемых, сумма которых равна 324. 2)составить алгоритм (в виде блок-схемы) возведения...
dielela
26.05.2020 08:00
Выбери верные правописания. «белый»(компьютер )( белый )«BMW »(автор)« автор »...
katya0132
07.12.2020 15:41
Выберите самый большой объём информации из данных 1) 1гб 2) 1025мг 3) 4096кб 4) 102400б...
sergiomac1108
16.03.2022 11:00
Что общего навашино взгляд происхождение слов мыло и рыло...
Гошыш
21.02.2021 13:44
Школяр проїхав першу половину шляху зі швидкістю V1 = 15 км/год. Далі половину часу, що залишився він їхав зі швидкістю V2 =10 км/год, а потім до кінця шляху йшов пішки зі швидкістю...
Александра66656
12.12.2020 17:39
НУЖНО Какой обет дали родители при рождении сына Варфоломея?Принести сына в церковь и отдать его благодетелю всех Богу.Обеспечить сыну достойную и богатую жизнь.Дать мальчику...
baus100
12.12.2020 17:39
Задача на з єднання резисторів. (Задача на соединения резисторов, знайти - найти)...
valeria276
12.12.2020 17:39
записати з будь яких джерел утішку ( потішки ) Зробити літературний аналіз (тема головна дума , художні засоби, своє ставлення ) ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var x,s,k:real;
begin
x:=2;
While s<=20 do
begin
s:=s+x;
k:=k+1;
x:=x+0.8;
end;
write(k);
end.
Объяснение: