М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
anastasiyalaza
anastasiyalaza
06.05.2022 13:58 •  Информатика

4. вводится последовательность из 100 целых чисел. первое число соответствует количеству монет, которое петя кладет на левую чашу весов. второе число соответствует количеству монет, которое петя кладет на правую чашу весов. третье число соответствует количеству монет, которое петя кладет на левую чашу весов снова и так далее. вывести на экран, какая из чаш весов окажется тяжелее. вес каждой монеты равен 5 г.

👇
Ответ:
1greg
1greg
06.05.2022
Var A,R:longint;
c:byte;
Begin
WriteLn('Введите 100 целых чисел');
R:=0;
For c:= 1 to 100 do
    Begin
    ReadLn(A);
    if c mod 2 <> 0 then R:=R+A
    else R:=R-A
    End;
if R=0 then WriteLn('Чаши равны')
else if R>0 then WriteLn('Левая, на ',R*5,' г.')
     else WriteLn('Правая, на ',-R*5,' г')
End.
4,5(70 оценок)
Открыть все ответы
Ответ:
ZHICH
ZHICH
06.05.2022

Python 3

y = int(input()) #Ввод переменной y

y -= 1 #Уменьшение переменной на 1

print(y) #Вывод переменной y

или

y = int(input()) #Ввод переменной y

print(y - 1) #Вывод переменной y уменьшенной на 1

C++

#include <iostream>

using namespace std;

int main(){

   int y;

   cin >> y; #Ввод переменной y

   y --; #Уменьшение переменной на 1

   cout << y; #Вывод переменной y

   return 0;

}

или

#include <iostream>

using namespace std;

int main(){

   int y;

   cin >> y; #Ввод переменной y

   cout << y - 1; #Вывод переменной y уменьшенной на 1

   return 0;

}

4,8(68 оценок)
Ответ:
Kosik1512
Kosik1512
06.05.2022

Псевдокод :

Начало

объявление целых переменных a и b

ввод a,b

вывод a+b

вывод a*b

Конец

c# :

using System;

using System.Collections.Generic;

using System.Linq;

using System.Text;

using System.Threading.Tasks;

namespace _1

{

   class Program

   {

       static void Main(string[] args)

       {

           Console.Write("Число a : ");

           int a = int.Parse(Console.ReadLine());

           Console.Write("Число b : ");

           int b = int.Parse(Console.ReadLine());

           Console.WriteLine("Сумма чисел a и b : {0}",a+b);

           Console.WriteLine("Произведение чисел a и b : {0}", a*b);

           Console.ReadKey();

       }

   }

}

PascalABC :

var

 a,b:integer;

Begin

 readln(a,b);

 writeln(a+b);

 writeln(a*b);

End.

4,4(18 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ