Есть ответ 👍

РЕБЯТА, УМОЛЯЮ НУЖНО ОЧЕНЬ ЗАРАНЕЕ ОГРОМНОЕ Ниже приведена программа:

var s,k: integer;
begin
readln(s);
readln(t);
if (s < 1) and (t < 2)
then
writeln ('YES')
else
writeln ('NO')
end.
Было выведено 9 запусков программы, при которых в качестве значений переменных вводились следующие пары чисел (s, t):

(3, 5); (4, 3); (4, −5); (0, 7); (0, −2); (−2, 1); (−2, 5); (−2, −4); (1, 2).

Сколько было запусков, при которых программа напечатала «NO»? В качестве решения выпишите все пары запусков и напротив каждого укажите вывод: YES или NO. В ответе укажите количество.

2. Составьте программу, выводящую значение вещественной переменной x, равной значению выражения 2(a+b)/a^2,где a и b – целочисленные переменные, их значения вводятся с клавиатуры.

3. Целое положительное число вводится с клавиатуры. Нужно проверить является ли оно четным.

4. Напишите программу, которая вычисляет сумму n-первых целых положительных чисел S = 1 + 2 + 3 + … + n. Количество суммируемых чисел n должно вводиться пользователем во время работы программы.

114
353
Посмотреть ответы 1

Ответы на вопрос:

sevara17
4,6(26 оценок)

Var   a,x: real; begin   write('введите через пробел x и a: ');   read(x,a);   writeln((6+x)/(3-a)) end.   результат выполнения программы: введите через пробел x и a: 5.18 4.65 -6.77575757575757 var   i,d,n,k,s: integer; begin   write('укажите количество чисел: '); read(n);   writeln('вводите числа: ');   k: =0; s: =0;   for i: =1 to n do   begin       read(d);       if (d mod 3)=0 then inc(k)       else s: =s+d   end;   writeln('количество кратных 3 равно ',k);   writeln('сумма некратных 3 равна ',s) end. тестовое решение: укажите количество чисел: 7 вводите числа: 4 18 6 45 7 20 8 количество кратных 3 равно 3 сумма некратных 3 равна 39

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

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

Подпишись на наш телеграмм канал

GTP TOP NEWS