В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География

1. Определите число, которое будет напечатано в результате выполнения программы (записанной ниже на разных языках программирования).

Бейсик Паскаль
DIM N, S AS INTEGER
N = 0
S = 0
WHILE S <= 249
S = S + 24
N = N + 3
WEND
PRINT N var n, s: integer;
begin
n : = 0;
s : = 0;
while s <= 249 do
begin
s : = s + 24;
n : = n + 3
end;
write(n)
end.
Си++ Алгоритмический язык
#include <iostream>
using namespace std;
int main()
{
int n, s;
n = 0;
s = 0;
while (s <= 249)
{
s = s + 24;
n = n + 3;
}
cout « n « endl;
} алг
нач
цел n, s
n : = 0
s : = 0
нц пока s <= 249
s : = s + 24
n : = n + 3
кц
вывод n
кон
Python
n = 0
s = 0
while s <= 249:
s += 24
n += 3
print(n)

2. Запишите число, которое будет напечатано в результате выполнения следующей программы. Для Вашего удобства программа представлена на пяти языках программирования.

Бейсик Python
DIM S, N AS INTEGER
S = 0
N = 1
WHILE S*S <= 125
S = S + 3
N = N * 2
WEND
PRINT N s = 0
n = 1
while s*s <= 125:
s = s + 3
n = n * 2
print(n)
Паскаль Алгоритмический язык
var s, n: integer;
begin
s := 0;
n := 1;
while s*s <= 125 do
begin
s := s + 3;
n := n * 2
end;
writeln(n)
end. алг
нач
цел n, s
n := 1
s := 0
нц пока s*s <= 125
s := s + 3
n := n * 2
кц
вывод n
кон
Си++
#include <iostream>
using namespace std;
int main()
{ int s = 0, n = 1;
while (s*s <= 125) { s = s + 3; n = n * 2; }
cout « n « endl;
return 0;
}
3. Запишите число, которое будет напечатано в результате выполнения следующей программы. Для Вашего удобства программа представлена на пяти языках программирования.

Бейсик Python
DIM S, N AS INTEGER
S = 0
N = 25
WHILE S + N <= 100
S = S + 20
N = N − 5
WEND
PRINT S s = 0
n = 25
while s + n <= 100:
s = s + 20
n = n − 5
print(s)
Паскаль Алгоритмический язык
var s, n: integer;
begin
s := 0;
n := 25;
while s + n <= 100 do
begin
s := s + 20;
n := n − 5;
end;
writeln(s)
end. алг
нач
цел s, n
s := 0
n := 25
нц пока s + n <= 100
s := s + 20
n := n − 5
кц
вывод s
кон
Си++
#include <iostream>
using namespace std;
int main()
{
int s = 0, n = 25;
while (s + n <= 100) {
s = s + 20;
n = n − 5;
}
cout « s;
return 0;
}

4. Определите, что будет напечатано в результате работы следующего фрагмента программы:

Бейсик Python
DIM K, S AS INTEGER
S = 0
K = 1
WHILE S < 66
K = K + 3
S = S + K
WEND
PRINT K s = 0
k = 1
while s < 66:
k += 3
s += k
print(k)
Паскаль Алгоритмический язык
var k, s: integer;
begin
s:=0;
k:=1;
while s < 66 do begin
k:=k+3;
s:=s+k;
end;
write(k);
end. алг
нач
цел k, s
s := 0
k := 1
нц пока s < 66
k := k + 3
s := s + k
кц
вывод k
кон
Си++
#include <iostream>
using namespace std;
int main() {
int s, k;
s = 0, k = 1;
while (s < 66) {
k = k + 3;
s = s + k;
}
cout « k « endl;
return 0;
}

5. Определите число, которое будет напечатано в результате выполнения программы.
Для Вашего удобства программа представлена на четырёх языках программирования.

Бейсик Паскаль
DIM I, S AS INTEGER
I = 0
S = 70
WHILE S > 7
S = S – 7
I = I + 1
WEND
PRINT(I) var i, s: integer;
begin
i := 0;
s := 70;
while s > 7 do
begin
s := s – 7;
i := i + 1
end;
writeln(i)
end.
Си++ Алгоритмический язык
#include <iostream>
using namespace std;
int main()
{
int i, s;
i = 0;
s = 70;
while (s > 7)
{
s = s – 7;
i++;
}
cout « i « endl ;
} алг
нач
цел i, s
i := 0
s := 70
нц пока s > 7
s := s - 7
i := i + 1
кц
вывод i
кон
Python
i = 0
s = 70
while s > 7:
s -= 7
i += 1
print(i)​

Показать ответ
Ответ:
13102005bibe
13102005bibe
15.03.2023 03:54
// PascalABC.NET 3.0, сборка 1076
begin
  var n:=ReadInteger('Число элементов массива=');
  var a:=ArrRandom(n,-25,25);
  Write('Исходный массив: '); a.Println;
  var k:=a.Where(x->sqr(x)>sqr(a[0])).Count;
  if k>0 then Writeln
    ('Найдено ',k,' элементов, квадрат которых больше квадрата первого')
  else Writeln
    ('Нет ни одного элемента, квадрат которого больше квадрата первого')
end.

Тестовое решение:
Число элементов массива=15
Исходный массив: 11 12 -11 -3 -16 -22 22 4 -4 -1 -16 -9 -19 4 16
Найдено 7 элементов, квадрат которых больше квадрата первого
0,0(0 оценок)
Ответ:
saida1808
saida1808
14.02.2020 19:36

о каляска не бей я тоже хочу в этом году в тетради или например сказать другу и слушайте как я красиво пою ты на работе хорошо я поняла что это за что извиняетесь я не могу найти в интернете и слушайте как я красиво пою ты на работе хорошо я поняла что это не я а не в курсе что это не я а не в курсе что это не я а не в курсе что это не я а не в курсе что это

Объяснение:

о каляска не бей а ты как я красиво пою ты мне прислал а вам не нужно будет сделать благодаря разных записей в тетради или например сказать другу и слушайте как я красиво пою ты на работе хорошо я поняла что ты вообще не отправляешь задания на проектирование

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота