Категория
Информатика, опубликовано 06.06.2020 20:39

Используя набор данных "Товарооборот СССР с некоторыми странами" (Приложение, №10),
построить линейную диаграмму, отражающую импорт из разных стран в 1989-1990 гг.
Товарооборот СССР с некоторыми странами
В 1990 г. импорт из ФРГ составил 4976,4 млн. руб. В 1989 г. экспорт в Японию составил 1184,2
млн. руб. В 1989 г. экспорт в Италию составил 1691,2 млн. руб. В 1989 г. импорт из Франции
составил 1189,9 млн. руб. В 1990 г. импорт из Австрии составил 1004,5 млн. руб. В 1990 г. импорт
из Японии составил 2138,0 млн. руб. В 1989 г. экспорт в Великобританию составил
1794,1 млн. руб. В 1989 г. импорт из ФРГ составил 3231,3 млн. руб. В 1989 г. экспорт в Австрию
составил 454,9 млн. руб. В 1990 г. экспорт в Финляндию составил 1758,8 млн. руб. В 1989 г.
экспорт в США составил 331,5 млн. руб. В 1989 г. импорт из Великобритании составил 623,1 млн.
руб. В 1990 г. экспорт в Италию составил 1920,1 млн. руб. В 1989 г. импорт из Японии составил
1950,9 млн. руб. В 1990 г. импорт из США составил 2865,2 млн. руб. В 1990 г. экспорт в
Великобританию составил 2208,7 млн. руб. В 1989 г. экспорт во Францию составил 1578,0 млн.
руб. В 1990 г. импорт из Великобритании составил 1009,1 млн. руб. В 1989 г. импорт из Австрии
составил 711,7 млн. руб. В 1989 г. импорт из Италии составил 1343,1 млн. руб. В 1990 г. экспорт в
ФРГ составил 2478,3 млн. руб. В1989г. импорт из США составил 1772,6 млн. руб. В 1990 г. импорт из Италии составил 1606,3 млн. руб. В 1990 г. экспорт в США составил 527,7 млн. руб. В
1989 г. импорт из Финляндии составил 2188,3 млн. руб. В 1990 г. импорт из Франции составил
1218,4 млн. руб. В 1990 г. экспорт в Японию составил 1343,0 млн. руб. В 1989 г. экспорт в
Финляндию составил 1528,7 млн. руб. В 1990 г. экспорт в Австрию составил 429,6 млн. руб. В
1989 г. экспорт в ФРГ составил 2397,2 млн. руб. В 1990 г. импорт из Финляндии составил
2126,8 млн. руб. В 1990 г. экспорт во Францию составил 1348,6 млн. руб.

Ответы

Ответ
Ответ оставил: Гость
Program glg;
var
a:array[1..10] of integer;
min, kol: integer;

begin
i := 0;
kol:=0;
min:= 100000;
while i < 10 do
begin
readln (a[i]);
if a[i] < min then min:= a[i];
end

i:=0;
while i < 10 do
if a[i] = min then kol = kol + 1;
writeln(kol);
end.

Если ошибки будут, пишите в комментарии. Я с телефона писал, мог где-нибудь, да ошибиться. (Написано на Pascal)
Ответ
Ответ оставил: Гость
Машина , Берёза , Операционная система ,Клавиатурный тренажёр
Ответ
Ответ оставил: Гость
Никак.........................
Ответ
Ответ оставил: Гость
На каком языке нужна программа?


Другие вопросы по информатике

✅ Ответов: 1 на вопрос по информатике: Используя набор данных "Товарооборот СССР с некоторыми странами" (Приложение, №10), построить линейную диаграмму, отражающую импорт из разных стран в 1989-1990 гг. Товарооборот СССР с некоторыми странами В 1990 г. импорт из ФРГ составил 4976,4 млн. руб. В 1989 г. экспорт в Японию составил 1184,2 млн. руб. В 1989 г. экспорт в Италию составил 1691,2... ты найдешь на сайте. Также ты можешь добавить свой вариант ответа, если считаешь, что он не верен или твой ответ более полный. Пожалуйста, добавляй только правильные ответы.
Вконтакте Youtube