Новые вопросы

Информатика Архивный вопрос

Блок схему пж
Program b3;
var a, i, p: Integer;
begin
WriteLn(a);
Read(a);
p := 3;
for i := 1 to 5 do
begin
p := p * a;
WriteLn(p);
end;
end.

Нет комментариев

Ответы

Гость

Вот держи!!!!!!!!!!!!!!!

Вот держи!!!!!!!!!!!!!!!

Нет комментариев

Похожие вопросы

Информатика

Что такое ,,материнская плата"

...

Ответить

Информатика

Воспользуйтесь учебником истории и приведите пример словесной модели исторического события Ставлю 62 БАЛЛА!!!!!...

Ответить

Информатика

Информатика 8класс таблицы истинности!
Друзья, прошу у вас помощи. Никак не понимаю эту тему.
Постройте таблицы истинности для логических формул :
3) не а или b;

6) не а или b и с;

8) не (а или b) и (с или b);

...

Ответить

Информатика

Составить программу решения линейного уравнения ax + b = 0, где а не равно 0....

Ответить

Информатика

Блоксхему пж
Program b4;
Var n:byte;
Begin
write('Введите номер месяца: ');readln(n);
Case n of
1,2,12:writeln('Зима');
3..5:writeln('Весна');
6..8:writeln('Лето');
9..11:writeln('Осень')
else writeln('Не корректный номер месяца');
End;
End....

Ответить

Информатика

Блоксхему пж
program wk;
var x,a,b,c:integer;
begin
Readln(x);
A:=x mod 10;
b:=x div 100;
c:=(x div 10)mod 10;
x:=a*100+b*10+c;
Writeln(x);
Writeln(a,' ',b,' ',c);
end....

Ответить

Список предметов

Математика

Литература

Русский язык

Геометрия

Английский язык

Биология

Другие предметы

Обществознание

Окружающий мир

География

Українська мова

Українська література

Қазақ тiлi

Беларуская мова

Информатика

Экономика

Французский язык

Немецкий язык

Психология