Все категории

4 года назад

Помогите пожалуйста расписать все команд

Знания

Информатика

1 ответ:

RIDER - [5]4 года назад

0 0

Можно сделать по разному:

1) Число А 5, В 20

2) Число А 14 В 11

3) число А 7 В 18

Читайте также

Дано целое число х. если число кратно 3, то построить зеленую окружность, иначе-построить желтый квадрат. В PascalABC

Икарик [7]

uses graphabc;

var

x: integer;

begin

setwindowsize(200, 200);

read(x);

if (x mod 3 = 0) then

begin

setbrushcolor(clgreen);

fillcircle(100, 100, 60);

end

else

begin

setbrushcolor(clyellow);

fillrectangle(150, 150, 50, 50);

end;

end.

0 0

4 года назад

ПОМОГИТЕ ПОЖАЛУЙСТА РЕШИТЬ ЗАДАНИЯ СРОЧНО НУЖНО!!!!НУЖНО ТОЛЬКО 7 И 10 ЗАДАНИЯ.В 10 ЗАДАНИИ ВАРИАНТ (4) В СТОЛБЦАХ.ЖЕЛАТЕЛЬНО С

Андрей Котофф [416]

7) a)1
b)2
c)0
!!!!!!!!!

0 0

4 года назад

Запишите число 12 345 в развернутой форме и в виде схемы Горнера.

Lessyana [3.1K]

Развернутая форма:
12345 = 1*10^4 + 2*20^3 + 3*10^2 + 4*10^1 + 5*10^0
Схема Горнера:
10*(10*(10*(10*1+2)+3)+4)+5

0 0

4 года назад

Вывести все четные делители числа, введённого с клавиатуры!!! На Паскале! Срочно!!!

артогор [28]

Var a, i: integer;
begin
readln(a);
for i:=2 to a do
if (a mod i = 0) and (i mod 2 = 0) then writeln(i);
end.

0 0

4 года назад

Постройте логические схемы, соответствующие логическим выражениям и найдите значение логических выражений: F=A/\B\/A, A=1, B=1

В1и2к3а4

F=A/\B\/A, A=1, B=11/\1\/1=1f=1

0 0

4 года назад