Филологические предшественники информатики: риторика и поэтика,герменевтика,семиотика.
Import java.util.Scanner;
public class Task24318284 {
public static void main(String[] args) {
Scanner in = new Scanner(System.in);
System.out.print("Введите трехзначное число: ");
int num = in.nextInt();
System.out.println("Первая цифра : " + num/100);
}
}
1)
цел a, b, c
алг
нач
ввод a,b,c
если mod(a+b,2)=0 то
вывод (a+b)/c
иначе
вывод (a+b)*c
все
кон
2)
цел a,d1,d2
алг
нач
ввод a
если (a>9) и (a<99) то
d1:=div(a,10);
d2:=mod(a,10);
вывод d1*d2
вывод' '
вывод d1+d2
вывод' '
вывод d1-d2
иначе
вывод 'ошибка'
все
кон
var breadPrice: real; // цена хлеба
breadCount: byte; // количество хлеба
milkPrice: real; // цена молока
milkCount: byte; // количество молока
sum: real; // сумма покаупки хлеба и молока
#4
a)
1
2
3
4
5
b)
1 1
2 4
3 9
4 16
5 25
6 36
7 49
8 64
9 81
10 100
c)
пустой вывод
#5
n = 5
#6
until n > 10 or a == 0
#7
a)
program _1to10;
var
i: integer;
begin
for i := 1 to 10 do
write(i, ' ')
end.
b)
program sqr_7_27;
var
i: integer;
begin
for i := 7 to 27 do
begin
if i mod 2 == 1 then
write(sqr(i), ' ');
end;
end.
c)
program sqrt_3_4per_23;
var
i: integer;
begin
i := 3;
repeat
write(sqrt(i), ' ');
i := i + 4;
until (i > 23);
end.