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

Определите значение переменной s после выполнения следующих операторов: s: =0; k: =6; while k больше 3 do k: =k - 1; s: =s + k;

👇
Ответ:
S:=0  k:=6

трассировка цикла с предусловием:
k:=5   S:=5
   k:=4   S:=9
     k:=3   S:=12   >  выход из цикла

   ответ  12
4,8(96 оценок)
Открыть все ответы
Ответ:
freeSkoM
freeSkoM
05.03.2021
№1
#include <iostream>
using namespace std;
int main ()
{
int a,b;
cin >> a >> b;
if (a<b) cout << a << endl;
else if (a==b) cout << "a=b" << endl;
else cout << b << endl;
system ("PAUSE");
return 0;
}

№2
#include <iostream>
using namespace std;
int main ()
{
char ch1,ch2;
int i1,i2;
cin >> ch1 >> ch2;
i1=ch1;
i2=ch2;
if (i1<=i2) cout << ch1 << ' ' << ch2 << endl;
else cout << ch2 << ' ' << ch1 << endl;
system ("PAUSE");
return 0;
}

№3
#include <iostream>
using namespace std;
int main ()
{
float p,q;
cout << "p=";
cin >> p;
cout << "q=";
cin >> q;
cout << p-2*q << endl;
system ("PAUSE");
return 0;
}
4,4(68 оценок)
Ответ:
НаТаШаЯЯЯ
НаТаШаЯЯЯ
05.03.2021
VAR
   n, m, sum, i, j: Integer;
   a: Array [1..10000] of Array [1..10000] of Integer;
BEGIN
   Read(n, m);

   For i := 1 to n do
      For j := 1 to m do Read(a[i][j]);

   For i := 1 to n do
      For j := 1 to m do
         If (a[i][j] > 0) then sum := sum + a[i][j];

   Write(sum);
END. 

Но для экономии времени и сил можно не создавать массив:
VAR
   n, m, sum, el, i, j: Integer;
BEGIN
   Read(n, m);

   For i := 1 to n do
      For j := 1 to m do begin 
         Read(el);
         If (el > 0) then sum := sum + el;
      End;

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