3 года назад

Дано целое положительное число А<10 вывести на экран все четные и нечетные числа отдельной строкой до А

Знания

Информатика

1 ответ:

Natalie233 года назад

0 0

program raf105;

var

i,n: integer;

begin

write('Введите число: ');

readln(n);

write('Чётные: ');

for i:=1 to n do

if i mod 2 = 0

then write(i,' ');

writeln;

write('Нечётные: ');

for i:=1 to n do

if i mod 2 <> 0

then write(i,' ');

end.

<h3><u>PascalABC 3.4.2</u></h3>

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

Программирование!помогите! пожалуйста!1) дана строка. Удалить из нее все знаки препинания.2) дана строка, содержащая текст. найт

Александра48 [5.4K]

могу ответить только на первый т.к. не очень сильно знаю c++

#include <bits/stdc++.h>

using namespace std;

int main()

{

ifstream fin("c:\input.txt");

string s,sr;

int j;

bool f=true;

while(getline(fin,s))

{

for(int i=0;i<s.length();++i)

{

if((s[i]>='a' && s[i]<='z') ||

(s[i]>='A' && s[i]<='Z'))

{

sr=sr+s[i];

f=true;

}

cout<<sr;

}

0 0

4 года назад

Помогите решить второй номер по информатике, он не сложный, я просто не знаю, как записать ✩

Евгений хисм

1. cat.jpeg, foto.bmp, dog.gif, song.eps, war.wmf.
2. NIKITA\IVAN\fizik.jpeg.
NIKITA\PETR\ANNA\air.bmp.
3. 1029 байтов = 1029 * 8 = 8232 бита.
$2^{10}$ байтов = $2^{10} * 2^{8} = 2^{18}$ бит = 262144 бит.
512 кбайт = 512 * $2^{13} = 512 * 8192 = 4194304$ бит.
1010 байтов = 1010 * 8 = 8080 бит.
2 байта = 2 * 8 = 16 бит.
20 битов.
10 битов.

10 битов < 16 битов < 20 битов < 8080 битов < 8232 битов < 262144 битов < 4194304 битов.

10 битов < 2 байта < 20 битов < 1010 байтов < 1029 байтов < $2^{10}$ байтов < 512 кбайт.

0 0

4 года назад

Дана последовательность случайных натуральных чисел, лежащих в диапазоне от 1 до 255. Конец последовательности число 0. Определи

max1806 [21]

Program z7; Var i,n,s:integer; a:array [1..1000] of integer; p:real;Begin n:=0; for i :=1 to 1000 do begin read(a[i]); n:=n+1; if (a[i]= 0) then break; end; for i :=1 to n do begin write(a[i],' '); end; s:=0; for i:=1 to n do s:=s+a[i]; p:=s/n; writeln; writeln(p:3:3);End.

0 0

4 года назад

12:00 PM EST по англійському часу а яка година по українському?

Олик163 [7]

12 часов после полудня.

То есть 24:00.

0 0

4 года назад

Составьте алгоритм нахождения периметра прямоугольника в словесной форме.∞∞∞∞∞∞∞À

МаксКом

СПОСОБ №1

1) найти длину горизонтальной стороны прямоугольника.

2) найти длину вертикальной стороны прямоугольника.

3) сложить два получившихся числа.

4) умножить получившиеся число на два.

СПОСОБ №2

1) найти длину горизонтальной стороны прямоугольника.

2) умножить получившиеся число на два.

3) найти длину вертикальной стороны прямоугольника.

4) умножить получившиеся число на два.

5) сложить два получившихся числа.

0 0

4 года назад

Прочитать ещё 2 ответа