Спо информатике
в какой части ленты можно найти команды создать, открыть,сохранить и печать?

211

483

Посмотреть ответы 2

Ответы на вопрос:

slava202011

Информатика

4,7(49 оценок)

ответ:

с лева клацаеш на файл там открыть и создать слева в вкладке вставка печатать

объяснение:

201102

Информатика

4,6(82 оценок)

// pascalabc.net 3.0, сборка 1073 var a,b,c: integer; begin write('введи a,b,c: '); read(a,b,c); if (a=b) or (a=c) or (b=c) then writeln('есть пара одинаковых') else writeln('все числа различные') end. тестовое решение: введи a,b,c: 6 3 -12 все числа различные введи a,b,c: 5 -4 5 есть пара одинаковых // pascalabc.net 3.0, сборка 1073 var n: string; a,b: char; begin write('введи натуральное число n: '); readln(n); write('введи подряд пару разыскиваемых цифр: '); read(a,b); if pos(a,n)> 0 then writeln('в числе есть цифра '+a) else writeln('в числе цифры '+a+' нет'); if pos(b,n)> 0 then writeln('в числе есть цифра '+b) else writeln('в числе цифры '+b+' нет') end. тестовое решение: введи натуральное число n: 3141592653589793 введи подряд пару разыскиваемых цифр: 47 в числе есть цифра 4 в числе есть цифра 7 // pascalabc.net 3.0, сборка 1073 var i,n: integer; fiba,fibb,fib: longint; begin write('введи натуральное число (1-46): '); read(n); if n< 3 then writeln('число фибоначчи равно 1') else begin fiba: =1; fibb: =fiba; for i: =3 to n do begin fib: =fiba+fibb; fiba: =fibb; fibb: =fib end; writeln('число фибоначчи равно ',fib) end end. тестовое решение: введи натуральное число (1-46): 13 число фибоначчи равно 233