Сделайте таблицу к этой расстояние от юпитера до солнца 778 млн.км. расстояние от урана до солнца 2 870 млн.км. диаметр планеты юпитер 142 800 км. диаметр планеты сатурн 120 860 км. расстояние от сатурна до солнца 1 427 млн.км. диаметр планеты уран 52 000 км. расстояние от земли до солнца 150 млн.км. расстояние от плутона до солнца 5 950 млн.км. диаметр планеты меркурий 4 880 км. расстояние от нептуна до солнца 4 497 млн.км. время обращения сатурна вокруг солнца 29,5 лет. диаметр планеты плутон 3 000 км. расстояние от марса до солнца 228 млн.км. диаметр планеты нептун 48 400 км. время обращения урана вокруг солнца 84 года. время обращения нептуна вокруг солнца 165 лет. время обращения юпитера вокруг солнца 12 лет. расстояние от меркурия до солнца 58 млн.км. время обращения земли вокруг солнца 365 дней. время обращения меркурия вокруг солнца 88 дней. диаметр планеты марс 6 790 км. время обращения венеры вокруг солнца 225 дней. диаметр планеты земля 12 756 км. диаметр планеты венера 12 100 км. время обращения плутона вокруг солнца 248 лет. расстояние от венеры до солнца 108 млн.км. время обращения марса вокруг солнца 687 дней.

👇

Увидеть ответ

Ответ:

1230a

28.04.2021

Таблица - в прилагаемом файле.

4,7(21 оценок)

Открыть все ответы

Ответ:

uylia7

28.04.2021

//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
var a,n,i,s:integer;
begin
write('Число элементов последовательности ');
readln(n);
for i:=1 to n do begin
write(i,' элемент последовательности = ');readln(a);
if (a mod 2 <>0) then s:=s+a;
end;
writeln('Сумма нечетных = ',s);
end.

Тестовое решение:
Число элементов последовательности 5
1 элемент последовательности = 3
2 элемент последовательности = 2
3 элемент последовательности = 4
4 элемент последовательности = 1
5 элемент последовательности = 5
Сумма нечетных = 9

4,8(85 оценок)

Ответ:

mikhailstrelni

28.04.2021

1. Если имеется в виду язык Pascal, то получим следующее:
var: a;
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
begin
readln(a);
b:=a+a;
writeln (b);
end.

Program50.pas(5) : Неизвестное имя 'b'

2. Попробуем такой вариант на Python

a =int(input())
b = a+a
print(b)

При вводе а получим на выходе 10

Получается, что в Pacal требуется объявлять переменные в секции переменных, или в любом месте программы можно объявить переменную с служебного слова var для PascalABC.net. Первый код можно переписать так, и он будет работать:

var: a;
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
begin
readln(a);
var b:=a+a;
writeln (b);
end.

Рузультат при введенном значении 5 равен 10

4,4(42 оценок)

Это интересно:

Дом-и-сад

01.06.2021

Как сделать гелевый освежитель воздуха: просто, быстро и недорого...

Компьютеры-и-электроника

21.04.2022

Как победить Анкано в Skyrim...

15.01.2022

Как довольствоваться тем, что у вас есть...

Взаимоотношения

29.10.2021