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

1) Какое значение будет принимать переменная Y после выполнения фрагментов программы?

a) Var Y, X: integer;

Begin

Y: = 1;

X: = 12;

Repeat

Y: = Y*X;

X: = X – 2;

Until X<7;

Writeln (‘Y=’,Y);

End.

б) Var Y, X: integer;
Begin
Y: = 1;
X: = 16;
Repeat
Y: = X*X;
X: = X – 4;
Until X<=0;
Writeln (‘Y=’,Y);
End.

2) Определить значение переменной у после выполнения фрагмента следующей программы:

Var y:real;

i:integer;

begin

y:= 1;

i:= 2;

repeat

i:=3*i;

y:=y+i

until i > 7;

Writeln ('y=',y);

End.

👇
Ответ:
krejzin
krejzin
04.12.2022

а) y =960

б) y=16

2  у = 25

Объяснение:

а)

y=1

x=12

y=12

x=10

y=960

x=6 ( х стал меньше 7, значит выводим строку с "y")

б)

y=1

x=16

y=256

x=12

y=144

x=8

y=64

x=4

y=16

x=0

тут х =0 а значит выводи строку с y

2.

y = 1

i=2

y=7

i=6

i=18

y=25

тут y стал больше 7, значит выводи строку с y

4,7(80 оценок)
Ответ:
Amkissa
Amkissa
04.12.2022

ответ:1542

Объяснение:

4,8(32 оценок)
Открыть все ответы
Ответ:
9ky3ya
9ky3ya
04.12.2022
// ConsoleApplication60.cpp: определяет точку входа для консольного приложения.//
#include "stdafx.h"#include<conio.h>#include"iostream"#include "stdio.h"#include "time.h"
using namespace std;
int main(){ int x, y,c; setlocale(LC_ALL, "RUS"); srand((unsigned)time(NULL)); x = rand() % 8 + 2; y = rand() % 8 + 2; cout << "Сколько будет  " << x << "*" << y << "?" << "\n"; cout << "Введите ответ и нажмите Enter  "; cin >> c; if (x*y == c) { cout << "Правильно\n";  } else { cout << "Вы ошиблись   " << x << "*" << y << "=" << c;  }return 0;}
4,7(35 оценок)
Ответ:
hbkkb
hbkkb
04.12.2022
 program z1;
 var n,m:integer;
 rost,nine_a,nine_b:real;
 begin
write('Введите количество учинеков 9а класса: ');
readln(n);
write('Введите количество учинеков 9б класса: ');
readln(m);
writeln('Вводите рост каждого из учинеков 9а по очереди');
for i:integer :=1 to n do begin
write(i,': ');
read(rost);
nine_a:=nine_a+rost;
end;
nine_a:=nine_a/n; // средний рост 9а
writeln('Вводите рост каждого из учинеков 9б по очереди');
for i:integer :=1 to m do begin
write(i,': ');
 read(rost);
nine_b:=nine_b+rost;end;
nine_b:=nine_b/n; // средний рост 9б
if nine_a > nine_b then write('Средний рост учеников 9а больше.') else if nine_a < nine_b then write('Средний рост учеников 9б больше.') else write('Средний рост учеников 9а равен среднему росту учеников 9б.');
end.

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