інформатика 2020 by https://padlet.com/tetjanahabor/inf2020 Завдання для самоконтролю en-us 2020-09-09 07:28:10 UTC 2024-12-15 08:52:40 UTC hello@padlet.com tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/730793701 2020-09-09 13:03:51 UTC https://padlet.com/tetjanahabor/inf2020/wish/730793701 tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/730796327 2020-09-09 13:04:29 UTC https://padlet.com/tetjanahabor/inf2020/wish/730796327 tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/730798487 2020-09-09 13:04:58 UTC https://padlet.com/tetjanahabor/inf2020/wish/730798487 tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/730800304 2020-09-09 13:05:23 UTC https://padlet.com/tetjanahabor/inf2020/wish/730800304 tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/730801628 2020-09-09 13:05:41 UTC https://padlet.com/tetjanahabor/inf2020/wish/730801628 tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/730803121 2020-09-09 13:06:01 UTC https://padlet.com/tetjanahabor/inf2020/wish/730803121 tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/730804383 2020-09-09 13:06:17 UTC https://padlet.com/tetjanahabor/inf2020/wish/730804383 tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/730805714 2020-09-09 13:06:34 UTC https://padlet.com/tetjanahabor/inf2020/wish/730805714 tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/732374332 2020-09-09 17:51:59 UTC https://padlet.com/tetjanahabor/inf2020/wish/732374332 tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/739676916 2020-09-11 17:21:26 UTC https://padlet.com/tetjanahabor/inf2020/wish/739676916 tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/739711484 2020-09-11 17:28:35 UTC https://padlet.com/tetjanahabor/inf2020/wish/739711484 tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/739729912 2020-09-11 17:32:40 UTC https://padlet.com/tetjanahabor/inf2020/wish/739729912 Задано 4 числа a, b, c, d, що визначають довжини відрізків. Визначити, чи можна з цих відрізків утворити паралелограм.Вхідні даніУ єдиному рядку задано 4 числа через пропуск.Вихідні даніВивести у єдиному рядку слово "YES", якщо паралелограм утворти можна або "NO" (без лапок) у протилежному випадку. tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/739858120 var                     a,b,c,d:real;begin   read(a,b,c,d);if ((a=c) and (b=d)) or ((a=b) and (c=d)) or ((a=d) and (b=c)) then writeln('YES') else writeln('NO'); end.]]> 2020-09-11 17:58:48 UTC https://padlet.com/tetjanahabor/inf2020/wish/739858120 Задано масив цілих чисел. Визначити суму найменшого та найбільшого елементів масиву.Вхідні даніУ першому рядку задано кількість елементів масиву n (n ≤ 100). У другому рядку задано n елементів масиву, значення кожного з яких за модулем не перевищує 100.Вихідні даніВивести суму найменшого та найбільшого елементів масиву. tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/739865539 var n,i:integer; s,m:integer;p:integer; a:array [1..100] of integer;
begin read(n);
for i:=1 to n do begin read( a[i]); end;
   for i:=1 to n do  for p:=1 to n-1 do
if a[p]>a[p+1] then begin
m:=a[p]; a[p]:=a[p+1];a[p+1]:=m;end;
s:=a[1]+a[n];  writeln(s); end.]]> 2020-09-11 18:00:20 UTC https://padlet.com/tetjanahabor/inf2020/wish/739865539 Підрахувати кількість щасливих квитків, у яких сума перших трьох цифр дорівнює n. Щасливим називається квиток з шестизначним номером в якого сума перших трьох цифр дорівнює сумі останніх трьох.Вхідні даніОдне натуральне число n (n ≤ 27).Вихідні даніВивести кількість шуканих щасливих квитків. tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/739872826 var
n,a,b,c,d,f,g:byte;
i,k,s1,s2: longint;
begin
readln(n);
k:=0;
for i:=000000 to 999999 do
begin
a:=i div 100000;
b:=i div 10000 mod 10;
c:=i div 1000 mod 10;
d:=i div 100 mod 10;
f:=i div 10 mod 10;
g:=i mod 10;
s1:=a+b+c;
if s1=n then
begin
s2:=d+f+g;
if s2=n then k:=k+1;
end;
end;
write(k);
end.]]> 2020-09-11 18:01:51 UTC https://padlet.com/tetjanahabor/inf2020/wish/739872826 tetjanahabor https://padlet.com/tetjanahabor/inf2020/wish/739930892 2020-09-11 18:14:10 UTC https://padlet.com/tetjanahabor/inf2020/wish/739930892