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

Определите, что будет напечатано в результате работы следующей программы.
Var s,і:integer;
Begin
s := 3;
For і := 2 to 5 do
s := s + 2* і;
Writeln (s) ;
End.

ответ: ___________
2. Определите, что будет напечатано в результате работы следующей программы.
Var s,k: integer;
Begin
s := 0;
for k := 4 to 8 do
s := s+7;
writeln(s);
End.
ответ: ____________
3. Определите, что будет напечатано в результате работы следующей программы.
Var k,i: integer;
Begin
k := 4;
For i := 1 to 3 do
k := 2*k + i;
Writeln(k);
End.
ответ: ___________
4. Определите, что будет напечатано в результате работы следующей программы.
Var s,k: integer;
Begin
s:=0;
for k:=1 to 11 do
s:=s+12;
write(s);
End.
ответ: ____________
5. Определите, что будет напечатано в результате работы следующей программы.
var s, k:integer;
begin
s := 0;
for k := 2 to 12 do
s := s + 11;
writeln (s);
end.
ответ: ___________

Ответы

Ответ
Ответ оставил: Гость
//Pascal
var
  tick, sum: integer;
begin
while tick <> 108 do
begin
  tick := tick + 4;
  sum := sum + tick;
end;
writeln(sum);  
end.
Ответ
Ответ оставил: Гость
File:///C:/Users/Алексей/Downloads/Pascal%20(краткий%20курс)%20—%20wikilic%20(1).htm 
Ответ
Ответ оставил: Гость
Static int MidVal(int a, int b, int c){    if (a == b || b == c || c == a) return Int32.MaxValue; // неопределенность
    if (a > b)        if (a > c)            if (b > c)                return b;            else                return c;        else            return a;
    if (b > c)        if (a > c)            return a;        else            return c;
    return b;}
Ответ
Ответ оставил: Гость
Машина , Берёза , Операционная система ,Клавиатурный тренажёр


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

✅ Ответов: 1 на вопрос по информатике: Определите, что будет напечатано в результате работы следующей программы. Var s,і:integer; Begin s := 3; For і := 2 to 5 do s := s + 2* і; Writeln (s) ; End. ответ: ___________ 2. Определите, что будет напечатано в результате работы следующей программы. Var s,k: integer; Begin s := 0; for k := 4 to 8 do s := s+7; writeln(s); End. ответ: ___________... ты найдешь на сайте. Также ты можешь добавить свой вариант ответа, если считаешь, что он не верен или твой ответ более полный. Пожалуйста, добавляй только правильные ответы.
Вконтакте Youtube